Есть триTedit.

← →
Dina © (2004-03-04 13:54) [0]

Есть три Tedit. Вводятся числа (могут быть отрицательные).
А вдруг кто-то введет 4-9, например. Как исключить ситуацию подобного ввода. Я проверяю через try, except. Однако, затем надо поставить SetFocus на нужный TEdit. Подскажите!!!

← →
NAlexey © (2004-03-04 13:55) [1]

Насколько я понимаю минус может быть только в начале текста?

← →
MBo © (2004-03-04 13:57) [2]

ES_NUMBER добавить в стиль.

← →
Dina © (2004-03-04 13:58) [3]

Да, минус только вначале. -5. И все.

← →
Ega23 © (2004-03-04 14:06) [4]

Бери Val jn Tedit.Text. Если не число, то Code<>0. А дальше Edit.SetFocus

Try

a:=strToFloat(Edit1.text)

except
activecontrol:=edit1.text;
end

activecontrol:=edit1.text;
Это что?

Есть триTedit. Найти похожие ветки