Фунция Round

← →
rsboarder © (2005-11-25 10:50) [0]

Хелп ми! Я новичек в этом деле....скажите,как огруглить значение введенное в Edit

← →
Sergey13 © (2005-11-25 10:57) [1]

Так надо Round не в форуме писать, а в программе. В чем проблема то?

← →
Edit1 (2005-11-25 15:40) [2]

procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text:=inttostr(round(strtofloat(Edit1.Text))); end;

Разделитель - запятая.

Как вводить только дробные числа:
http://delphimaster.net/view/2-1132920391/

← →
Ega23 © (2005-11-25 15:56) [3]

> Разделитель - запятая.
>

С фига-ли?

← →
Antonn © (2005-11-25 18:49) [4]

Ega23 © (25.11.05 15:56) [3]
С фига-ли?
телепатор использует...

← →
rsboarder © (2005-11-25 19:32) [5]

а не по нажатию?

← →
EditRound (2005-11-25 19:43) [6]

>а не по нажатию?

procedure EditRound; begin Form1.Edit1.Text:=inttostr(round(strtofloat(Form1.Edit1.Text))); end;

thks

Фунция Round Найти похожие ветки