delphi socket客户端连接服务端时的错误

服务端关闭，客户端连接的时候，会报10061错误

这个时候，用try except end; 是捕获不到的。

因为这个socket是线程内的错误。无法捕获。

begin
  if ErrorCode = 10061 then
  begin
    ShowApplicationMsg('用IPAD操作打印前请手动打开对应单据！',IWARNINGMSG);
    tasklist.Delete(0);
    ErrorCode := 0;
  end;
end;

socket 自带 error 函数，在这里处理