大家来谈谈Delphi中使用ADO时经验和常见的一些错误（散分）

Question

如题，使用ADO时常碰到一些莫名其妙的错误（有些是Delphi的BUG），有时候搞不清是Delphi的问题还是数据库的问题，请大家谈谈各自的经验。

Answer 1

ADO在程序中RUN后关闭时老是会出现CPU调试，我不知道怎么解决就直接RESET，把RESET图标放在RUN边上，方便点，不知道还有没有更好的办法呢？

Answer 2

bee2518(真棒) ::reset图标在那？？？？？？
接分

Answer 3

代码如果正确应该不会出现CPU调试的.......
接分

Answer 4

Delphi7中有RESET的图标，早期版本没有

Answer 5

用ADO时我碰到过一个BUG,一打开一个特定的窗体整个工程就自动退出了,
好来解决了,用notebook打开某个文件改了一个ADO有关的参数,具体现在忘了.
不知道大家有没碰到过?

Answer 6

try
adoconnection1.beginstran;
do.....
adoconnection.commitstran;
except
adoconnection1.rollbacktran;  //显示错误
for I := 0 to adoconnection1.Errors.Count - 1 do
    begin
      case AParam.AConnection.Errors[I].NativeError of
        547  : begin
                 if pos('insert',AParam.AConnection.Errors[I].Description) > 0 then
                 begin
                   //'外键约束insert,delete,update';
                   if sErrText <> '' then sErrText := sErrText + #13;
                   sErrText := sErrText + 's';
                 end
                 else
                 if pos('delete',AParam.AConnection.Errors[I].Description) > 0 then
                 begin
                   if sErrText <> '' then sErrText := sErrText + #13;
                   sErrText := sErrText + 's';
                 end
                 else
                 if pos('update',AParam.AConnection.Errors[I].Description) > 0 then
                 begin
                   if sErrText <> '' then sErrText := sErrText + #13;
                   sErrText := sErrText + 's';
                 end;
               end;//end of 547        945  : begin
                 if sErrText <> '' then sErrText := sErrText + #13;
                 sErrText := sErrText + '您的内存不足！';
               end;//end of 945        4850 : begin
                 if sErrText <> '' then sErrText := sErrText + #13;
                 sErrText := sErrText + '数据库表被锁定！';
               end;//end of 1204        2627 : begin
                 if sErrText <> '' then sErrText := sErrText + #13;
                 sErrText := sErrText + '输入的关键属性值已经存在！';
               end;//end of 2627        7303 : begin
                 if sErrText <> '' then sErrText := sErrText + #13;
                 sErrText := sErrText + '网络初始化失败！请检查网络设置！';
               end;//end of 7303        10024: begin
                 if sErrText <> '' then sErrText := sErrText + #13;
                 sErrText := sErrText + '网络连接超时！请检查网络设置！';
               end;//end of 10024        else   begin
                 if
               end;
      end;//end of case    end;//end of for
    //最后显示错误信息sErrText 
end;
______________
做个调查，关于软件界面
http://expert.csdn.net/Expert/TopicView2.asp?id=1649010
谢谢关注

Answer 7

对于楼上所说的reset键，在delphi中可以设置 的，好像在custom里吧，挺好的，我也常把reset放外面，这样一旦程序出错，就能按这键终止了

Answer 8

Ctrl+F2——还是用快捷键比较方便接分:D

Answer 9

ADO是非常稳定的，错误多办出在连接和SQL语句上TO:csouth(金子) 
用ADO时我碰到过一个BUG,一打开一个特定的窗体整个工程就自动退出了,
好来解决了,用notebook打开某个文件改了一个ADO有关的参数,具体现在忘了.
不知道大家有没碰到过?你的窗口上连接了数据库，而该数据库或数据表因为已经被删除即会出现以上问题，请回想你的数据连接情况将其恢复，这可能是BORLAND的BUG，避免的办法无论如何不要将ADOQUERY或ADOCONNECTION的ACTION属性设为TRUE，应该在运行时刻动态打开。

Answer 10

一直以为win98里集成了ado 现在怀疑了http://expert.csdn.net/Expert/topic/1655/1655416.xml?temp=.5659601

Answer 11

正在学习ing。非常想了解ADO。听说很先进的。关注。

Answer 12

嘻嘻, 我也是用Ctrl+F2来Reset的...