Подскадите как проверить переменную на соответствие типу

← →
vodvorezlaya (2006-09-08 08:13) [0]

Ув. мастера подскажите как проверить соответствие например типу Integer текста поля Edit1.Text.

Или например во время ввода компонента DBGrid в одну из его колонок соответствие полю real?

Спасибо.

← →
Думкин © (2006-09-08 08:22) [1]

Попробовать перевести в нужный тип -
1. Val - если не удачно, то один параметр это сообщит
2. StrToInt - если не удачно, возникнет исключение - обработать.

← →
Dmitrij_K (2006-09-08 08:42) [2]

TryStrToInt
StrToIntDef
ну и Val
см. F1

← →
vodvorezlaya (2006-09-08 08:45) [3]

Спасибо.

> vodvorezlaya

Уточняю Думкиново

procedure TForm1.Button1Click(Sender: TObject); var v:variant; begin caption:=""; try v:=StrToInt(Edit1.Text); caption:="int";except try v:=strTofloat(Edit1.Text); caption:="float";except end; end; end;

>Elen © (08.09.06 08:45) [4]

Господи, да чего ж так мудрено-то ?
К тому же стиль кода просто безобразный.

Все сказано в [2]

PS. Использование защищенных блоков где ни попадя и без особой необходимости не только затрудняет отладку, но и запутывает код. Как, к примеру, в [4]

Подскадите как проверить переменную на соответствие типу Найти похожие ветки