[Lenovo]

Здравствуйте, в общем проблема такая!
Надо чтобы в Edit-е вводилась только числовая информация! Т.е чтобы запрет был на ввод буквенной!
Думаю код внесет вам ясность

Код:

DataModule3.ADOTable1.Last;
if Edit1.Text='' then Label1.Caption:='' else
Label1.Caption:= FloatToStr(DataModule3.ADOTable1.FieldByName('Koordinata_konca_sekcii').AsFloat + StrToFloat(edit1.Text));
end;

Заранее спасибо!