Indy 10 und TCP Client...

[Schucki]

Hi,

Lösung gefunden!!! :bounce1:

Delphi-Quellcode:

procedure TfrmMain.timTcpTimer(Sender: TObject);
begin
  if not IdTCPClient.Connected then exit;
  with IdTCPClient do begin
    while not IOHandler.InputBufferIsEmpty do begin
      strlTcpRead.Add(IOHandler.Readln)
    end;

    while strlTcpRead.Count>0 do begin
      ....
      .... // Daten auswerten...
      ....
      strlTcpRead.Delete(0);
    end;
  end;
end;

Dank Euch alle, vielleicht braucht das ja auch mal einer...
Gruß Frank