Текущий архив: 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.47 MB
Время: 0.013 c
