System.Trunc、System.Round、System.Int - 返回整数部分

• 举例:

var
i: Integer;
d: Real;
begin
i := Trunc(1234.5678); {截取整数}
ShowMessage(IntToStr(i)); {1234}
i := Trunc(-1234.5678);
ShowMessage(IntToStr(i)); {-1234}
i := Round(1234.5678); {四舍五入}
ShowMessage(IntToStr(i)); {1235}
i := Round(-1234.5678);
ShowMessage(IntToStr(i)); {-1235}
{Int 和 Trunc 都是向 0 方向舍入, 貌似结果一直, 但它们返回的类型不一样}
{Trunc 返回的是 Int64; Int 返回的是 Extended 类型}
d := Int(1234.5678);
ShowMessage(FloatToStr(d)); {1234}
d := Int(-1234.5678);
ShowMessage(FloatToStr(d)); {-1234}
end;