S
san_fish
Unregistered / Unconfirmed
GUEST, unregistred user!
发生异常后，系统会抛出一个异常对话框，我想在发生异常后调用自己的对话框应该怎么做？？
我尝试过用try。。。except。。代码如下：
try
ADOConnection1.Connected:=True;
except
dStr:='连接服务器超时，请检查网络或者服务器状态';
MessageBox(Handle,PChar(dStr),'错误',MB_OK or MB_ICONERROR);
Exit;
end;
但是发现还是有系统本身的那个对话框出现：（
我尝试过用try。。。except。。代码如下：
try
ADOConnection1.Connected:=True;
except
dStr:='连接服务器超时，请检查网络或者服务器状态';
MessageBox(Handle,PChar(dStr),'错误',MB_OK or MB_ICONERROR);
Exit;
end;
但是发现还是有系统本身的那个对话框出现：（