Hi marabu,
Ich runde immer auf und verwende Extended:
Delphi-Quellcode:
function Gerundet(rValue: Extended): Extended;
begin
Result := Round(0.5 + rValue * 1000) / 1000;
end;
Irgendwann hab ich mir das 'Real' abgelehnt. Irgendwer im Forum hat mich darauf gebracht, lieber CPU-native Typen zu verwenden. Double und Extended sind die wohl.
So jetse ...chhrrr....chhhrrrr...