function Trunc(X:  Вещественный тип):  Int64;

Функция Trunc округляет вещественное значение путем отбрасывания дробной части (округляет в направлении нуля). В отличие от Int, Trunc возвращает целый результат. Trunc не является настоящей функцией.

• Функция Trunc временно устанавливает управляющее состояние FPU, выполняет округление и восстанавливает состояние FPU.
• Если X - целое, компилятор исключает вызов функции и просто возвращает значение X.
• Если X - значение типа Variant, Delphi автоматически преобразует его в вещественное число и выполняет округление.
• Компилятор не принимает аргументы типа Int64, однако вызов функции Trunc для Int64 не имеет смысла.
• Если X равно бесконечности или NaN, Trunc генерирует ошибку времени выполнения 6 (EInvalidOp).