Показать сообщение отдельно
  #1  
Старый 16.11.2013, 20:40
anghela anghela вне форума
Прохожий
 
Регистрация: 02.09.2013
Сообщения: 28
Версия Delphi: Delphi 7
Репутация: 9
Восклицание проверка поля на число

Нужно сделать проверку поля: данные - это числа или нет.
Написала такой код:
Код:
var  proverka_chislo:integer;
if not TryStrToInt(Edit2.Text,proverka_chislo)  then
 begin
   Showmessage('Серия и номер паспорта введены не верно');
   Exit;
 end;
Ошибку не выдает, если вводишь текст, выдает правильное сообщение, но если вводишь длинное число типа 9405698565 (мне нужно ввести в это поле серию и номер паспорта), то выводит то же сообщение, типа введены данные не правильно. Пробовала писать тип longint, результата нет.
Может кто-нибудь подскажет в чем ошибка
Ответить с цитированием