Hi,
wo steht denn dieser Code ? So ganz wird mir nicht klar was du da machst.
Delphi-Quellcode:
procedure TForm1.ClientSocket1SocketRead(Socket:tClientSocket);
var
text: string;
begin
text := '';
while Socket.Receivelength>0 do
text := text + Socket.ReceiveText;
....
end;
So - oder so ähnlich - geht das normalerweise.
Gruss und Guten Rutsch