Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.18;
Скачать: CL | DM;

Вниз

Округление переменной до 2 цифр   Найти похожие ветки 

 
Rash ©   (2002-03-03 23:25) [0]

Ламерский, конечно вопрос. Есть ли такая функция? Или все же надо через строку обработчик делать?


 
lipskiy ©   (2002-03-04 00:43) [1]

Конкретизируй.


 
Rash ©   (2002-03-04 18:15) [2]

Нужно в числе типа real оставить только две значащие цифры после запятой.
например: 2.547100 -> 2.550000



 
lipskiy ©   (2002-03-04 18:49) [3]

Первое, что пришло в голову:
x:= (round(x*100))/100;
Может быть и проще можно.


 
Awex ©   (2002-03-04 19:07) [4]

Да.... это вопрос уже задавали и отвечали на него пару десятков раз...... пора добавлять в факи.......

Можно универсальней:

const
RoundArray: array[0..6] of Longint = (1, 10, 100, 1000, 10000, 100000, 1000000);

function RoundEx(var dValue: double; var aDecimals: integer): double;
begin
if (aDecimals > 6) or (aDecimals < 0) then
Result := dValue
else
Result := Round(dValue * RoundArray[aDecimals]) / RoundArray[aDecimals];
end;


 
Rash ©   (2002-03-04 19:38) [5]

Блин. Могла и сама догадаться. :)))

Большое спасибо!!!



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
14-57510
Black_Angel
2002-02-03 17:07
2002.03.18
Своя игра


4-57570
oblom
2002-01-16 23:34
2002.03.18
найти приложение


1-57451
lipskiy
2002-03-02 00:22
2002.03.18
Нужно входящий параметр в процедуре объявить несколькими типами...


6-57472
Sega
2002-01-02 02:41
2002.03.18
IP Multicast


14-57499
Донской
2002-02-02 14:43
2002.03.18
clMoneyGreen