有关socketconnection连接消息捕获的问题(100分)

采用socketconnection进行midas的连接，但如果网络不稳定的时候，socketconnection连不上server时，客户端l老是报“未知软件异常”，“内存读取错误”。
已使用
try
socketconnection.connect:=true;
except
showmessage('连接错误1');
end;
但还是捕获不了连接错误消息。
请问有没有好的异常处理机制，socketconnection连不上的时候，会有提示信息，客户端不会报错。

这个很简单的！我有帖说过！！：
定义一个异常:
type MyEx = class(Exception);
//自定义一个异常，继承 Exception 类
在socketErr那里抛出一个异常！
procedure TfrmMainForm.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket;
ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin

raise Myex.Create('报警服务器未连接，请检查！');
end;
然后捕捉就可以了:
try
ClientSocket1.Active:=True;
except //捕捉异常
on E: myexdo
Showmessage(E.Message);
见：http://www.delphibbs.com/delphibbs/dispq.asp?lid=3359768

请教ranyang:
“在socketErr那里抛出一个异常！”－－好像在socketconnection里没有找到ClientSocket1Error的事件啊

不好意思！我看错了！

多人接受答案了。