Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
17. Mai 2008
Nein, denn das hat 2 Probleme:
-Da du genau abfragst, ist es sehr wahrscheinlich, dass es nie wahr wird.
-wenn einmal gestartet ist, friert es dein System ein.
Soll deine Prozedur wirklich ununterbrochen aufgerufen werden?
procedure TForm1.StarteFunktion;
begin
// Prüfen ob die Anfangszeit erreicht ist
if now > EncodeTime( 14, 0, 0) and Now < EncodeDate(16,0,0) then
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
17. Mai 2008
Du sagst es ihr ja auch, und dann wird die Funktion aufgerufen. Du musst in der Eventmethode die Uhrzeitünerprüfung durchführen und dann ggf die gewünschte Aktion ausführen.