Delphi - Como pasar un número de Real a Integer?

Estoy iniciandome y tengo un pequeño poblema como pasar un número tipo REAL (del tipo TTimeDate) a INTEGER.
GRACIAS POR VUESTRAS ATENCIÓN

INTENTA CON

FLOATTOSTR(NUMERO REAL)
EJEMPLO:
SHOWMESSAGE (FLOATTOSTR(12.58))

INTENTA CON RAUND

NumInt := ROUND ( NumReal )

GRACIAS POR LA AYUDA, JOSE LUIS