Mind you, Int() is not the equivalent of round(). I think you'd be better off with trunc().

see

[pascal]ShowMessage('Round(12.75) = '+IntToStr(Round(12.75)));
ShowMessage('Trunc(12.75) = '+IntToStr(Trunc(12.75)));
ShowMessage(' Int(12.75) = '+FloatToStr(Int(12.75)));[/pascal]
or this site.