TClientSocket的错误处理

Question

procedure ClientSocket1Error(Sender:TObject;Socket:TCustomWinSocket;
ErrorEvent:TErrorEvent;varErrorCode:integer);
begin
  ErrorCode:=0;//当出现错误是老是会弹出一个确认框Socket ErrorCode=0
　　　　　　　//请问要怎么写代码才能忽略错误，不跳出确认框
end; 

Answer 1

现在都改为indy组件了,所以没有源码了.

Answer 2

使用try     except   语句。
通常情况下，在你连接或发送数据时，用try  except 语句处理，就可以自己解决连接中断异常。例如
try
  FClientSocket.connect;
except
  //处理异常end;

Answer 3

楼上兄弟，你看清楚点，我一开始就把ErrorCode置为０了
弹出错误为Socket Error #0，今天早上还看到
在使用中的软件弹出这样的错误报告
//我在出现错误的时候会联合使用Timer控件进行服务器的重新连接的
才致使使用中还能继续连接到server不然的话就完了．