Geht es nicht leichter, indem man sich am Anfang des Programmes GetTickCount merkt und dann wenn man es braucht den alten Tick vom neuen subtrahiert und in Minuten umrechnet?
GetTickCount ist, glaube ich, in Millisekunden, also die Differenz / 1000 / 60.
Delphi-Quellcode:
procedure TForm1.FormCreate();
begin
FStartTick = GetTickCount;
end;
function TForm1.GetTime : Cardinal;
begin
result := (GetTickCount - FStartTick) / 1000 / 60;
end;