Скачать: CL | DM;

Хелп Ми!!!!   Найти похожие ветки 

← →
eLig   (2003-09-22 17:02) [0]

При нажатии кнопки происходит вычисление. Ответ помещается в Едит. Ответ получается с запятой ( пример 12,456 ). Мне нужно чтобы то что после запятой (456) помещалось в Едит2. Как сделать ПОДСКАЖИТЕ ПОЖАЙЛУСТА. желательно с примером.

---

← →
HolACost! ©   (2003-09-22 17:08) [1]

FloatFormat и потом дели до ДесималСепаратора и после него

---

← →
HolACost! ©   (2003-09-22 17:09) [2]

FloatFormat и потом дели до ДесималСепаратора и после него

---

← →
Vovchik_A ©   (2003-09-22 17:10) [3]

FormatFloat(); ваще то

---

← →
VMcL ©   (2003-09-22 17:12) [4]

Frac() ?

---

← →
BillyJeans ©   (2003-09-22 17:15) [5]

Edit2.Text := Copy(Edit1.Text, Pos(",", Edit1.Text) + 1, Length(Edit1.Text) - Pos(",", Edit1.Text) - 1);

---

← →
Julliete   (2003-09-22 17:18) [6]

отделить целую и дробную часть.

Int целая, Frac дробная.

var
i:Real;
begin
i:=Frac(StrToFloat(Edit1.Text))*1000;
Edit2.Text:=FloatToStr(i);

---

Страницы: 1 вся ветка

Скачать: CL | DM;



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