das vergleichen der systemtime hab ich jetzt gelöst, auf einem ähnlichen weg wie es schon "Tyrael Y." vorgeschlagen hat! in der
api konnte ich allerdings noch ein paar funktionen für einen leichteren schnelleren weg finden...
Delphi-Quellcode:
function IsTimeRunningOut(TimeToCompare: TSystemTime): Boolean;
var
Now, TempTime: TFileTime;
begin;
GetSystemTimeAsFileTime(Now);
SystemTimeToFileTime(TimeToCompare, TempTime);
case CompareFileTime(Now, TempTime) of
-1: result := False;
0: result := True;
1: result := True;
end;
end;
die ausgabe ist dann:
false wenn die zeit "TimeToCompare" noch nciht erreicht ist
true wenn die zeit erreicht oder überschritten wurde
vllt hilft es ja noch jemand
edit noch mal überarbeitet und eine boolean variable draus gemacht..