![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскадите как проверить переменную на соответствие типу [D7, XP]
vodvorezlaya © (2006-09-08 08:13:00)Ув. мастера подскажите как проверить соответствие например типу Integer текста поля Edit1.Text.
Или например во время ввода компонента DBGrid в одну из его колонок соответствие полю real?
Спасибо.
MsGuns (2006-09-08 11:44:00) [1]>Elen © (08.09.06 08:45) [4]
Господи, да чего ж так мудрено-то ?
К тому же стиль кода просто безобразный.
Все сказано в [2]
PS. Использование защищенных блоков где ни попадя и без особой необходимости не только затрудняет отладку, но и запутывает код. Как, к примеру, в [4]
vodvorezlaya (2006-09-08 08:45:00) [2]Спасибо.
Elen (2006-09-08 08:45:00) [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;
Dmitrij_K (2006-09-08 08:42:00) [4]TryStrToInt
StrToIntDef
ну и Val
см. F1
Думкин (2006-09-08 08:22:00) [5]Попробовать перевести в нужный тип -
1. Val - если не удачно, то один параметр это сообщит
2. StrToInt - если не удачно, возникнет исключение - обработать.