Цитата:
|
Сообщение от delphi_begin
может быть есть какая-то опция, которой указывается обрезать ноль в дробной части или нет?
|
Тебе что, в большую сторону нужно округлять?
Если так, то используй функцию SetRoundMode.
Пример:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
SetRoundMode(rmUp);
ShowMessage(FloatToStr(RoundTo(14.402, -2)));
end;
p.s. Не забывай только потом возвращать режим округления назад.