在线程里面
while not Terminated do
begin
……
try
FIdTCPClient.Disconnect;
FIdTCPClient.Connect(FConnectTimeOut);
finally
end;
……
end;
出错以后线程就死掉了。
改成except就可以了。
奇怪!!!
在线程里面
while not Terminated do
begin
……
try
FIdTCPClient.Disconnect;
FIdTCPClient.Connect(FConnectTimeOut);
finally
end;
……
end;
出错以后线程就死掉了。
改成except就可以了。
奇怪!!!