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

Привет всем,вопрос такой , как можно окурглить числа после   Найти похожие ветки 

← →
uname   (2003-09-30 08:34) [0]

я еще начинающий программист, так что прошу сторго не судить а помочь...
мне например нужно 2345,4489 окурглить в 2345,45
как это сделать,

Заранее спаисбо!!

---

← →
Думкин ©   (2003-09-30 08:41) [1]

StrToFloat(FloatToStrF(2345.4489,ffFixed,18,2))

Например.

---

← →
uname   (2003-09-30 08:53) [2]

>Думкин
Пасибо! получилось

---

← →
VAleksey ©   (2003-09-30 09:34) [3]

x:= Round(x*100)/100;

---

← →
Семен Сорокин ©   (2003-09-30 09:47) [4]

FormatFloat

---

← →
Samael6 ©   (2003-09-30 09:50) [5]

RoundTo(123.34,2) {=123}

---

← →
BillyJeans ©   (2003-09-30 11:26) [6]

SimpleRoundTo(2345,4489, -2);

---

← →
BlackKing   (2003-09-30 12:03) [7]

Izvrashenije, no rabotajet

Function FloatRound(Value: Extended; Digits: Integer): Extended;
var
Digits10: LongInt;
DigitsString: String;
begin
DigitsString:="1";
while Length(DigitsString)<Digits+1 do
DigitsString:=DigitsString+"0";
Digits10:=StrToInt(DigitsString);
Result:=Round(Value*Digits10)/Digits10;
end;

---

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

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



Память: 0.46 MB
Время: 0.02 c