In der WindowsUnit sollten Funktionen zu finden sein, womit du dein TDateTime oder zumindetens TFileTime nach TSystemTime konvertieren kannst.
(der Umweg über die SystemTime-Struktur erspart dir das Datum selber zu zerlegen)
Mit
Str und
Val kannst du dann einzelne Zahlen nach Strings und zurück konvertieren.
Und schon kannst du dir daraus eine eigene Funktion erstellen, welche TDateTime nach String konvertiert.
[edit]
ups, hatte shmia überscrollt
[edit]
Zitat:
Delphi-Quellcode:
Function HoursBetween(Time1, Time2 : TDateTime) : Double;
Begin
result := Time2 - Time1 * 24;
End;
und hat noch keiner bemerkt, daß diese Funktion einen kleine Schönheitsfehler hat?
(fehlende Klammern)