想在OnException中处理,但不知该怎么写,帮忙一下啊//Exception和application.Exception应该差不多吧
IdTCPServer1Exception(AContext: TIdContext;AException: Exception);
begin
end;

解决方案 »

  1.   

    这个事件里面是已经出现异常了,才执行,你想屏蔽错误必须在代码中用
    try
     //可能出现异常的代码
    catch
     //
    end
    这样不是很好吗?
      

  2.   

    Try
       //可能出异常的代码
    Except
       //在这里捕获并处理异常
       //试试用 GetLastError()捕获异常代码
    End;IdTCPServer在还有客户端连接的时候自己不能直接关闭连接,可以通知所有客户端,让所有客户端全部主动断开连接,然后再关闭服务器.
      

  3.   

    就是呀,用TRY EXCEPT  END 
    很标准的方法嘛
    何必弄这么麻烦。
      

  4.   

    但是我想知道错误代码是何原因引起的,如果except的话,说不定网络就一直不正常了,反正没错误出现,我想要知道大致原因,然后想法屏蔽之
      

  5.   

    try
    except
     on e:exception do
     begin
        showmessage(e.message);//e.message就是错误原因
     end;
    end;