indy 10 TCpClient + Thread

[1aa]

Ich habe einen Thread welcher sämtliche Sende Und empfangs aufgaben erledigen soll:

Delphi-Quellcode:

TEvent = procedure of Object;

  tLeseThread = class(TThread)
    private
      fReadData : TEvent;
      fWriteData : TEvent;
      fDeleteData : TEvent;
    public
      procedure Execute; override;
      property ReadData : TEvent read fReadData write fReadData; 
      property WriteData : TEvent read fWriteData write fWriteData; 
      property DeleteData : TEvent read fDeleteData write fDeleteData; 
  end;
...

procedure tLeseThread.Execute;
begin
 while NOT(Terminated) do
   Begin
     if Not(Terminated) then if Assigned(fWriteData) then fWriteData;
     if Not(Terminated) then if Assigned(fReadData) then (fReadData);
     if Not(Terminated) then if Assigned(fDeleteData) then fDeleteData;
   End;
end;

senden klappt auch super nur beim Lesen schmiert der thread nach dem 1. read timeout ab.... weis einer woran das leigen könnte?

[Mavarik]

Greifen alle Deine Event-Procedures auf das gleiche Indy Object zu?

[1aa]

ja greifen sie

[Der schöne Günther]

Ganz dumme Vermutung: Indy Timeout wird doch als Exception geworfen. In deinem Thread bubbelt die ganz nach oben, niemand fängt sie. Somit ist der Thread zu Ende.

[1aa]

ok danke für den Tip jetzt geht es....