Как заставить эдит понимать числа

← →
Gnec © (2004-08-14 21:14) [0]

Доброго всем времени суток. Вот я хочу например чтобы у меня в одном эдите было какоенибудь число а, а в другом б. При нажатии на кнопку эти числа должны разделиться, сложиться или ещё чтонибудь математическое. Как мне сделать чтобы в эдитах были не Stringi,а числа???

← →
YurikGL © (2004-08-14 21:23) [1]

Складываем два числа

Edit3.text:=FloatToStr(StrToFloat(Edit1.text)+StrToFloat(Edit2.text))

← →
YurikGL © (2004-08-14 21:27) [2]

Лучше
try Edit3.text:=FloatToStr(StrToFloat(Edit1.text)+StrToFloat(Edit2.text)); except on e:exception do raise Exception.Create("Программа выяснила, что пользователь (или программист) допустили ошибку, приведенную ниже. Код строки 17 модуля 47"+#13+e.Message); end;

← →
Gnec © (2004-08-14 21:32) [3]

Спасибо! Щас буду пробовать!

← →
Gnec © (2004-08-15 15:09) [4]

Спасибо большое!!! Помогло. А теперь у меня тоже вопросик, как сделать так чтобы в эдит вводились только числа, без букв??? И можноли вообще такое замутить?

← →
YurikGL © (2004-08-15 15:15) [5]

MaskEdit

Или обрабатывать событие OnChange

OnKeyPress
if not key in ["0".."9"] then
if key = "-" then begin
if Edit1.SelStart <> 0 then
key:=#0;
end else
if key = DecimalSeparator then begin
if pos (DecimalSeparator,Edit1.Text) <> 0 then
key:=#0;
end else
key:=#0;

Как заставить эдит понимать числа Найти похожие ветки