N
ncutzcb
Unregistered / Unconfirmed
GUEST, unregistred user!
我的头儿设计了一个系统:
要求一个客户端连接5个服务端(服务端不一定同时在线)。
处理方法是:
在DataModule中放5个ClientSocket,将这5个控件放在一个数组中;
在一个Timer中检测各个ClientSocket的状态,
for index :=0 to Count-1 do
begin
if ClientSocketArray.Active then Continue;
ClientSocketArray.Close;
ClientSocketArray.Ip:=GetIp(i);{得到对应的IP}
ClientSocketArray.Port:= GetPort(i);{得到对应的Port}
ClientSocketArray.Open;
end;
在ClientSocket的OnError中
Socket.Close;
ErrorCode:=0;
在程序运行了大约一个小时后,出现错误:
ESocketError with message
'Windows socket error: 当该操作在进行中,由于保持活动的操作检测到一个故障,
该连接中断。 (10055), on API 'connect''. Process stopped.
请哪位大侠指点指点。
要求一个客户端连接5个服务端(服务端不一定同时在线)。
处理方法是:
在DataModule中放5个ClientSocket,将这5个控件放在一个数组中;
在一个Timer中检测各个ClientSocket的状态,
for index :=0 to Count-1 do
begin
if ClientSocketArray.Active then Continue;
ClientSocketArray.Close;
ClientSocketArray.Ip:=GetIp(i);{得到对应的IP}
ClientSocketArray.Port:= GetPort(i);{得到对应的Port}
ClientSocketArray.Open;
end;
在ClientSocket的OnError中
Socket.Close;
ErrorCode:=0;
在程序运行了大约一个小时后,出现错误:
ESocketError with message
'Windows socket error: 当该操作在进行中,由于保持活动的操作检测到一个故障,
该连接中断。 (10055), on API 'connect''. Process stopped.
请哪位大侠指点指点。