M meilixueshan200 Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #1 idTCPServer如何主动向idTCPClient发送信息?
S smokingroom Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #2 var I:Integer; begin with IdTCPServer1 do begin with Threads.LockList do try for I:=Count-1 downto 0 do begin try TIdPeerThread(Items).Connection.Write('testing...'); except end; end; finally Threads.UnlockList; end; end; end;
var I:Integer; begin with IdTCPServer1 do begin with Threads.LockList do try for I:=Count-1 downto 0 do begin try TIdPeerThread(Items).Connection.Write('testing...'); except end; end; finally Threads.UnlockList; end; end; end;
M meilixueshan200 Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #3 为什么客户端放在我的机器上可以,放在其它地方就不行呢? 郁闷
S smokingroom Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #4 有点小错误,将循环中的to改为downto
M meilixueshan200 Unregistered / Unconfirmed GUEST, unregistred user! 2006-07-01 #5 改了也不行呀 为什么客户端在我的机器上可以,在其它机器上就行??? 郁闷