BCB操作数据库捕捉异常

点纹十二卷

我用的是BCB,访问SQL Server,新增记录捕捉不到SQL返回的错误,请各位指点,谢谢了,:)
try
{
    this->ADOQuery1->Open() ;
    this->ADOQuery1->Insert() ;
     .....
    this->ADOQuery1->Post() ;
    this->ADOQuery1->Close();

}
catch(EDatabaseError *e){
                ShowMessage("Error");
                return ;
        }

      

apple_058

catch(EDatabaseError *e)应该
catch(EDatabaseError &e)

点纹十二卷

这是新增记录的SQL语句,如果有重复记录的话,捕捉到并提示已有此记录了,

点纹十二卷

现在程序运行是一有重复记录就报错,程序中断了

点纹十二卷

它的提示信息是EOleException类,用它也捕捉不到.:(

apple_058

catch(...)
看看

apple_058

或
catch (Exception &exception)

yjws121

try
{
    this->ADOQuery1->Open() ;
    this->ADOQuery1->Insert() ;
     .....
    this->ADOQuery1->Post() ;
    this->ADOQuery1->Close();

}
catch(Exception &e){
                ShowMessage(e.Message);
                return ;
        }

点纹十二卷

还是不行的.

freedomsoli

try
{
...
}
catch(Exception &E)
{
  ShowMessage("这里最好写代码所在函数的位置,帮助你找到出错的地方"  +E.Message);//这里最好加上E.Message,因为如果不加这句的话,只显示你的出错提示消息,你也不知道到底是为什么错的

}