Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.09;
Скачать: 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 вся ветка

Текущий архив: 2003.10.09;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.013 c
1-27543
Nastya
2003-09-30 16:18
2003.10.09
Как поставить полосу прокрутки TScrollBox-а в верхнее положение?


14-27732
Biryk
2003-09-12 03:20
2003.10.09
То что есть в вирусах но ножно для мирных целей...


1-27516
Zhouck
2003-09-26 13:32
2003.10.09
Формы для справочников как BPL


3-27356
gal
2003-09-19 08:32
2003.10.09
работа с БД


3-27351
MsGuns
2003-09-18 17:07
2003.10.09
Редактируемый отчет