Problem bei einem einfachem chat mit Client und ServerSocket

[blink182]

beim senden seh ich jetzt kein problem
von daher liegt das problem wohl beim OnClientRead des servers

Zitat:

Delphi-Quellcode:

procedure TForm1.serverClientRead(Sender: TObject; 
  Socket: TCustomWinSocket); 
str: string; 

begin 


str := ClientSocket.Socket.ReceiveText; 

chatlog_memo.Lines.Add(str); 
end;

um genauer zu sein "ClientSocket.Socket.ReceiveText" - richtiger wäre hier Socket.ReceiveText soweit ich das hier in erinnerung habe probier das mal