An dieser Stelle sei auch mal auf drei tolle Funktionen der
Unit DateUtils hingewiesen:
Delphi-Quellcode:
function DaysBetween(const ANow, AThen: TDateTime): Integer;
function HoursBetween(const ANow, AThen: TDateTime): Int64;
function MinutesBetween(const ANow, AThen: TDateTime): Int64;
Und ja, sie machen genau das, was man denkt, was sie machen könnten...