Hallo zusammen,
ich suche ein Lösung, bei der ich eine Zeitinterval warten kann und mein Programm nicht weiterläuft. Momentan behelfe ich mir mit den folgenden Construct. Das ist zugegebenermaßen hässlich. Hat jemand vielleicht einen Tipp für mich (andere Ansatz)? Danke!
ich starte einfach RetryTimeout... und warte.
Delphi-Quellcode:
procedure TMy.StartRetry;
begin
isStartRetryTimer:=True;
end;
procedure TMy.RetryTimeout;
begin
isStartRetryTimer:=False;
Timer.Interval:=FTimeBetweenRetries; // Timer setzen
Timer.Enabled:= True; //Timer starten
while isStartRetryTimer= false do;
Timer.Enabled:= False; //Timer anhalten
end;