Форум: "Начинающим";
Текущий архив: 2005.12.11;
Скачать: [xml.tar.bz2];

Вниз

Фунция 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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.039 c