Man köntne aber:
Delphi-Quellcode:
function mathround(x : real) : integer;
Begin
if frac(x) >= 0.5 //frac liefert den das nach dem ,
then result := ceil(x) //rundet auf
else result := trunc(x); //runded ab
end;
man müsste nur mal gucken wie es bei negativen Zahlen aussieht