appsvr+socketConnection 如何捕获网络中断socketConn产生的异常？(150分)(0分)

d6+Midas+socketConnection 用于广域网
如何捕获网络中断socketConn产生的异常(ESocketError)？
不使用beforeDisconnect/afterDisconnect 事件

捕获网络中断socketConn产生的异常
ESocketError、ESocketConnectionError类型
本人使用
E is ESocketError
判断不出来异常类型，调试信息显示E的内容为()
???
请教如何判断异常类型?

type
TSocketConnectionEx = class(TSocketConnection)
protected
//线程中Socket出现错误,发送给TSocketConnection的处理消息
procedure ThreadException(var Message: TMessage);
message THREAD_EXCEPTION;
//错误处理,继承它重新自己写即可
proceduredo
Error(E: Exception);
override;
end;

dfw真的没有人懂？！