Как проверить введена в Edit строка или число?

← →
Perf2k2 © (2006-01-12 10:34) [0]

Собственно сабж, больше добавить нечего... Спасибо.

← →
Johnmen © (2006-01-12 10:38) [1]

try
StrToFloat(...)
except
...
end

← →
stone © (2006-01-12 10:39) [2]

в Edit всегда вводится строка, в некоторых случаях она может быть преобразована в число.
Например, можно проверить функцией TryStrToInt и ей подобными. Подробности по F1.

← →
Barsky © (2006-01-12 10:41) [3]

numb:=true; for i:=1 to length(Edit1.Text) do if not ( Edit1.Text[i] in ["0".."9", DecimalSeparator]) then numb:=false;

← →
begin...end © (2006-01-12 10:43) [4]

Val

← →
vidiv © (2006-01-12 10:43) [5]

var t:integer; c:real; ... val(Edit1.Text, c, t); if t>0 then showmessage("строка") else showmessage("Действительное число")

← →
Johnmen © (2006-01-12 10:48) [6]

Числа, они и такие бывают 23E9

← →
Perf2k2 © (2006-01-12 11:03) [7]

Всем спасибо за советы, решил сделать вот так:

try StrToInt(EditSearch.Text); except On EConvertError do begin MessageDlg("Неверный формат поискового слова. Введите число.", mtWarning, [mbOK], 0); Exit; end;

Вот только он почему-то сначала свою ошибку выдает, а потом уже мою. В чем прикол? :(

← →
Perf2k2 © (2006-01-12 11:03) [8]

> Числа, они и такие бывают 23E9

Нет, у меня в базе без букв они.

← →
TUser © (2006-01-12 11:03) [9]

xyz - это тоже число. 35-ричное, правда :)

← →
Perf2k2 © (2006-01-12 11:04) [10]

> xyz - это тоже число. 35-ричное, правда :)

Там только 10-ричные.

← →
Johnmen © (2006-01-12 11:04) [11]

>Вот только он почему-то сначала свою ошибку выдает, а потом уже мою. В чем прикол? :(

В том, что ты запускаешь программу под Delphi IDE.

← →
Johnmen © (2006-01-12 11:06) [12]

>xyz - это тоже число. 35-ричное, правда :)

Обычное десятеричное число 23E9

> В том, что ты запускаешь программу под Delphi IDE.

Понял, спс. Теперь все нормуль :)

Есть функция IsNumeric (D7)

> Perf2k2 © (12.01.06 11:03) [8]

> > Числа, они и такие бывают 23E9

> Нет, у меня в базе без букв они.

Бывают и такие - $ABCDEF

--
Regards, LVT.

> Perf2k2 © (12.01.06 11:03) [8]
>
> > Числа, они и такие бывают 23E9
>
> Нет, у меня в базе без букв они.

Если они действительно числа, то они и хранятся без букв/символов и прочего в виде числа. А то что мы вводим в edit и видим в гридах и т.п. - это уже графическое представление последовательности символов. Как эту последовательность символов в edit будешь интерпретировать ты базе абсолютно по барабану.

Как проверить введена в Edit строка или число? Найти похожие ветки