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

Вниз

Округление вещественных чисел   Найти похожие ветки 

← →
antonioxxx ©   (2002-09-17 19:02) [0]

Уважаемые программисты! Подскажите, как вещественное число округлить до определённого знака после запятой? Спасибо!

---

← →
MegaBass ©   (2002-09-17 19:57) [1]

RoundTo()

---

← →
Алексей Ким ©   (2002-09-17 20:01) [2]

2MegaBass>случайно не знаешь что вызывает что? RoundTo->Format или
наоборот?

---

← →
777 ©   (2002-09-17 20:04) [3]

uses ...Math;
Caption:=FloatToStr(RoundTo(123,237,-2));

А Format здесь причем?

---

← →
MegaBass ©   (2002-09-17 20:04) [4]

посмотри в Math код RoundTo
я вообще сомневаюсь что RoundTo работает с Format

---

← →
Алексей Ким ©   (2002-09-17 20:08) [5]

2777(>777)ф1
2MegaBass не могу :( исходников нету, когда д инсталлировал места
мало было :( ну ладна перебьюсь...

---

← →
777 ©   (2002-09-17 21:50) [6]

function RoundTo(const AValue: Double; const ADigit: TRoundToRange): Double;
var
LFactor: Double;
begin
LFactor := IntPower(10, ADigit);
Result := Round(AValue / LFactor) * LFactor;
end;

---

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

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

Наверх

Память: 0.48 MB
Время: 0.016 c