我在Delphi6中利用Tserversocket和Tclientsocket控件进行网络连接传送数据,当连接建立起来以后,一旦TServersocket关闭(或者网络故障断开时),TClientSocket(客户端)会弹出#10061好异常对话框,用try...except...finally...end.语句没法处理这个异常,请问有那位大侠知道如何处理这种异常,用自己的代码处理代替系统对话框提示。不胜感激!

解决方案 »

  1.   

    在clientsocket控件的onerror事件处理过程里面添加
    errcode:=0
    就可以不提示异常了。
    其中 过程参数 errorevent是错误的类型。
    你再将errorcode置零之后(或之前)可以通过errorevent判断错误类型,以便进行处理。
      

  2.   

    不应该把,我觉得try块应该可以捕捉到这个异常的,是不是异常发生在try的外面?
      

  3.   

    因为是非阻塞方式,调用是异步调用,
    这种异常是不好抓的,你跟踪一下就明白了.
    它是提供了一个onerror事件,就用它好了.