数据库连接异常的捕捉问题(200分)

请大家看清题目，不要给我贴一段和我类似的代码之类
我已经全部试过
try
ADOConnection.Connected := True;
except
on E：Excetion do
begin
ShowMessage(E.Message);
end;
end;
我修改了ConnectString的字符串
曾经用过，异常出发，可这次就不行了
uiit(4835386) 13:07:37
跟踪发现在设置完true之后，一直在那里，
跟踪不到后面了
uiit(4835386) 13:07:45
想看看大家谁遇到过这种情况
~~Y.P~~(346970558) 13:01:28
一直在那里？？ 还是触发异常了，就是没有showmessage出来，是吗？
~~Y.P~~(346970558) 13:01:59
中断在＝true那里了，就是触发异常了。
uiit(4835386) 13:09:03
没有触发出来，执行不到except
uiit(4835386) 13:09:34
跳不出来。。。

我也等,遇到了同样的问题

基本原理

真有意思，大家通常的做法也都是你写的样子，try……except……嘛。
我以前是先Close，然后改ConnectionString，最后用Open来打开的，在这捕捉。要不你试试，但是一样的呀。
再就是Delphi调试的时候是不到Except后就会自主给信息的，也许你直接执行一下编译后的程序。
我也学习学习吧，帮你顶

谢楼上
你所说全部试过

用ApplicationEvents控件，该控件在additional页里，用于捕获异常信息，在其OnException事件里写上处理代码就可以防止你的程序在运行期出现大错误了。
简单实例：
在
procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
E: Exception);
begin
RecordException(sender,E);//异常处理代码
end;

procedure TForm1.RecordException(sender:tobject;E: Exception);
begin
if (E.Message='由于将在索引、 主关键字、或关系中创建重复的值，请求对表的改变没有成功。 改变该字段中的或包含重复数据的字段中的数据，删除索引或重新定义索引以允许重复的值并再试一次。')then
begin
application.messagebox('记录重复,请检查输入的数据后再进行操作','提示',MB_OK+MB_ICONINFORMATION);
exit;
end;
end;

前来领分.....[][]

哈哈，办法就是：分解程序，继续找出错误所在
待我找出，再告诉大家