Тема: [Delphi]/[Pascal] Задай вопрос, получи ответ
Показать сообщение отдельно

  #3  
Старый 17.04.2008, 15:57
dos999
Познающий
Регистрация: 15.02.2008
Сообщений: 98
Провел на форуме:
183980

Репутация: 50
По умолчанию
var
n: integer;
Цитата:
n:=length(edit1.text)
If (n = 15) or (n = 18) then ...
PS. Мало ли
 
Ответить с цитированием