Ich verwende double und zur Anzeige Round(Value * 100) / 100. Dabei muß man sicherstellen daß 100 * Value im int64 Bereich liegt.
Ich verwende anstatt round
Delphi-Quellcode:
function RoundX(const Value:Extended; const nk:Integer):Extended;
var
multi: Extended;
begin
multi := IntPower(10, nk);
Result := RoundUp(Value*multi) / multi;
end;