Forum: Object-Pascal / Delphi-Language
Delphi
by Union,
1. Nov 2005
HoursBetween(Anfang, Ende);
MinutesBetween(IncMinute(Anfang, Stunden * 60), Ende);
SecondsBetween(IncSecond(Anfang, Minuten * 60), Ende);
SecondsBetween(Anfang, Ende);
Achtung, die Syntax der ...Between Funktionen lautet immer xxxBetween(ANow, AThen), der größere der Zeitwerte also als ersten Parameter!
Forum: Object-Pascal / Delphi-Language
Delphi
by Union,
1. Nov 2005
Das machst Du am besten mit TDateTime:
var
dtStart : TDateTime;
...
// Programmbegin
dtStart := now;
...
// Programmende
LaufZeit := MilliSecondsBetween(now, dtStart);