wie auf bestimmte zeit reagieren??

[lbccaleb]

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..