用indy9控件写聊天程序，信息发送问题

[团子妈]

我是初学者，我用idtcpclient和idtcpserver写客户端和服务器，用writeln和readln进行客户端和服务器的通信。客户端向服务器发的信息，服务器能接收，服务器向客户端发的消息，客户端就收不到。这是为什么？还有所有客户端都是相同的，怎么实现与固定的客户端通信？就像QQ一样，与特定好友聊天，这是服务器的功能吗？服务器怎么区分不同的客户端？客户端接收代码

procedure TForm3.Button3Click(Sender: TObject);
begin
with IdTCPClient1 do
begin
try
if Connected then
Listbox1.Items.Text:=IdTCPClient1.ReadLn;
finally
IdTCPClient1.Disconnect;
end;
end;

客户端发送代码

begin
idTCPClient1.Connect();
idTCPClient1.WriteLn(Edit1.Text);
idTCPClient1.Disconnect;
end;

服务器接收和发送代码

procedure TForm1.IdTCPServer2Execute(AThread: TIdPeerThread);
var
name:string;
begin
name:=AThread.Connection.Readln();
memo1.Lines.Add(name);
Listbox1.Items.Add(name);
AThread.Connection.Writeln(Listbox1.Items.Text);
end;

[团子妈]

客户端发送的Edit1.Text内容能发到服务器，并且被memo1.Lines.Add(name);和Listbox1.Items.Add(name);添加，但是服务器给客户端发的AThread.Connection.Writeln(Listbox1.Items.Text);客户端就收不到，不能添加到客户端的Listbox1.Items.Text上。求帮助

[wylton]

idTCPClient1.Disconnect; 你都断开了， 怎么收？？

[团子妈]

引用 2 楼 wylton 的回复:

idTCPClient1.Disconnect; 你都断开了， 怎么收？？

去掉那条就报错，是为什么？而且也收不到的

[火鸟]

给你个小例子，回去自己借鉴一下吧 留下信箱

[团子妈]

引用 4 楼 java400081 的回复:

给你个小例子，回去自己借鉴一下吧 留下信箱

278490321，感谢