Hallo,
ich hab in meinem Programm mehrere Threads und möchte eine Art Timeout für die Threads coden, dh sobald der Thread länger als x Minuten existiert, soll er neugestartet werden.
Mein Problem ist aber, dass der Timer eifnach nichts macht, hab auch schon nen Breakpoint im OnTimeout gesetzt, nützt nichts, der führt das einfach nicht aus. Der Timer wird im Konstruktor des Threads erstellt. Interval hab ich auch testweise schon auf 1 gehabt etc etc...
Hier mal mein Code:
Delphi-Quellcode:
Timeout := TTimer.Create(nil);
Timeout.Interval := 1000;
Timeout.OnTimer := OnTimeout;
Timeout.Enabled := True;
[...]
procedure TMyThread.OnTimeout(Sender: TObject);
begin
fmain.mdebug.Lines.Add('timeout');
//Restart;
end;
Versteht das irgendwer??