Hi,
Lösung gefunden!!!
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