Das perverse rumge
stringe sollte man sich garnicht erst angewöhnen
HourOf
MinuteOf
SecondOf,
SecondOfTheMinute
bzw.
SecondOfTheDay
MilliSecondOfTheDay
SecondsBetween
usw.
DateUtils
SysUtils
...
für Zeiten pro Tag oder Zeitdifferenzen, kann man auch direkt rechnen,
denn
TDateTime ist ein Float (Double), wo im Nachkommateil die Uhrzeit steht, und vor dem Komma die Tage seit X.
Trunc(TimeOf(DT) * 24 * 60)
ergibt also die Minuten seit Mitternacht