Also wenn ich das richtig verstehen, willst du nur deinen Real-Wert in Integer umwandeln.
Delphi-Quellcode:
var
r: Real;
i1, i2: Integer;
begin
r := 3.5;
i1 := round(r);
i2 := trunc(r);
end;
Round rundet die Zahl (es würde 4 rauskommen) und
Trunc schneidet die Nachkommastellen ab (es würde 3 rauskommen)