Wie schon richtig bemerkt, steht der Nachkommaanteil für die Zeit.
TDateTime
Wobei da wohl Frac gleich das liefert, was benötigt wird
Delphi-Quellcode:
Zeit := Frac(DateTime);
Datum := Trunc(DateTime);
PS: gilt nur für einen positiven TDateTime-Wert ... genaueres steht in der
OH
[edit]
mkinzler: wie kannst du dich nur vordrängeln -.-''