用ClientSocket能发送消息，但却在ServerSocket端的Memo中显示不出来。何故？

Question

我用Delphi6的ClientSocket和ServerSocket做了一个聊天程序，能够把消息发送到服务器端，但却在ServerSocket端的Memo中显示不出来。其中ClientSocket的Host和Port、ServerSocket的Port设置都没问题，发送按钮的OnClick代码如下：
  ClientSocket1.Socket.SendText(Memo1.Lines[Memo1.Lines.Count-1]);
服务器端ServerSocket的OnClientRead的代码是：
  Memo2.lines.Add(Socket.ReceiveText);
就是显示不出来，不知道是什么原因？请求大家帮帮忙，在这里先谢谢了！！！

Answer 1

你试试用赋值的
var
s:string;
s:=socket.receivetext;
memo2.lines.add(s);
试试看

Answer 2

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var
    s:string;
begin
    s:=Socket.ReceiveText;  //用这个应该可以呀!
    Memo1.Lines.Add('从客户端('+Socket.RemoteAddress+')接收的信息为：'+s);
    Socket.SendText('接收信息成功！');
end;

Answer 3

没用过，俺用D7 IdTcpserver & IdTcpClent