W
wallysw
Unregistered / Unconfirmed
GUEST, unregistred user!
有客户端A,B,C，服务端SS。
A,B,C的连接代码一样，如下：
idTCPClient.Host := '192.168.1.100';
idTCPClient.Port := 8989;
idTCPClient.Connect;
我并且用一个线程来读：
Memo1.Lines.Add(idTCPClient.Readln);
服务端SS的代码如下：
idTCPServer.DefaultPort := 8989;
idTCPServer.Active := True;
现在A,B,C三个连接SS，都连接成功，但是我在服务端SS里面写这样的代码：
ShowMessage(IntToStr(idTCPServer.Threads.LockList.Count));
结果为1。
我再在SS里面写这样的代码：
for i := 0 to idTCPServer.Threads.LockList.Count - 1 do
begin
TIdPeerThread(idTCPServer.Threads.LockList.Items).Connection.WriteLn('abc');
end;
结果只有A收到'abc'字符，其它的没有。
如果用B先连接，另外两个后连接，那么也只有B收到SS发来的'abc'字符，也就是谁先连接，谁就能收到，请问高手，这是怎么回事啊？帮帮小弟啊。
A,B,C的连接代码一样，如下：
idTCPClient.Host := '192.168.1.100';
idTCPClient.Port := 8989;
idTCPClient.Connect;
我并且用一个线程来读：
Memo1.Lines.Add(idTCPClient.Readln);
服务端SS的代码如下：
idTCPServer.DefaultPort := 8989;
idTCPServer.Active := True;
现在A,B,C三个连接SS，都连接成功，但是我在服务端SS里面写这样的代码：
ShowMessage(IntToStr(idTCPServer.Threads.LockList.Count));
结果为1。
我再在SS里面写这样的代码：
for i := 0 to idTCPServer.Threads.LockList.Count - 1 do
begin
TIdPeerThread(idTCPServer.Threads.LockList.Items).Connection.WriteLn('abc');
end;
结果只有A收到'abc'字符，其它的没有。
如果用B先连接，另外两个后连接，那么也只有B收到SS发来的'abc'字符，也就是谁先连接，谁就能收到，请问高手，这是怎么回事啊？帮帮小弟啊。
]