Hi,
GetTickCount ist Dein Freund...
function GetTickCount: Integer;
Einfach die Funktion GetTickCount aufrufen (aus der
Unit Windows), der Rückgabewert ist die Laufzeit in Millisekunden.
Nachteil: Überlauf nach ~49 Tagen, da geht es dann wieder bei 0 los.
Gruß
Patrick