Floor gør præcis som dens navn antyder, runder ned
Tilsvarende findes ceil, som runder op, og round, som burde runde til nærmeste, men en bedre round funktion er:
function Round(F: Extended): Integer;
begin
Result := Floor(F);
if(Frac(F) >= 0.5)
Result := Result + 1;
end;
(Burde virke, ikke testet - har ikke Delphi mere)
Indlæg senest redigeret d. 27.07.2007 17:10 af Bruger #2330