TidTCPClient + ReadLn = hängt Programm auf

[guste]

indem man herausfindet wo sich das Programm aufhängt

Ich dachte zuerst an ein Problem bei ATerminator = '', jedoch macht das nichts weil ReadLine das bereits abfängt.

Delphi-Quellcode:

  // User may pass '' if they need to pass arguments beyond the first.
  if Length(ATerminator) = 0 then begin
    ATerminator := LF;
  end;

Ich würde also einfach mal mit durch den Indy Quellcode steppen und schauen was passiert.