Показать сообщение отдельно
  #1  
Старый 23.04.2008, 21:28
kobezzza kobezzza вне форума
Прохожий
 
Регистрация: 28.03.2008
Сообщения: 13
Репутация: 10
По умолчанию Вопросик по Case

Вообщем у меня была задачка цифорки перевести в слова...я сделал её, но по кривому( через If, вот решил переделать под Case, но прога отказывает работать( Подскажите плз де у мя не правильно, и как сделать, чтобы всё было кул)Заранее благодарен)
Код:
a:=copy(edit1.Text,1,1);
case a of
 '1': label1.Caption:='Один';
end;
Ответить с цитированием