delphi中indy10 的Idtcpserver断开客户端连接报错问题的解决办法
我们常用IdTCPServer1.Active := false;来关闭Idtcpserver，但这样会出卡机，并且操作也不会成功，后来，我改为这样：
也就是说不要用IdTCPServer1.Active := false;这种方式来断开Idtcpserver。
var
i: integer;
AList: TList;
begin
AList := IdTCPServer1.Contexts.LockList;
try
for i := AList.Count - 1 downto 0 do
begin
TIdContext(AList.Items[i]).Connection.Disconnect;
end;
finally
IdTCPServer1.Contexts.UnlockList;
end;
也就是说不要用IdTCPServer1.Active := false;这种方式来断开Idtcpserver。
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.043222904205322 seconds