Scalabium Software 

Knowledge for your independence'.  
Home Delphi and C++Builder tips 
#113: How can I round a number correctly? 

From first times when was released a Borland Pascal, in
sources was included a "bank" algorithm of number
rounding. For banks or some other financial organizations this algorithm is good but in other type of calculations we want a standard rounding. For this tasks I use the own small function that I use instead standard: function CorrectRound(x: Extended): LongInt; begin Result := Trunc(x); if (Frac(x) >= 0.5) then Result := Result + 1; end;

Copyright© 19982021, Scalabium
Software. All rights reserved. 