Текущий архив: 2005.12.11;
Скачать: CL | DM;
Вниз
Фунция 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;
← →
rsboarder © (2005-11-25 21:16) [7]thks
Страницы: 1 вся ветка
Текущий архив: 2005.12.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.035 c
