请问如何获取ADO的错误信息

Question

如果我写
ADOConnection.BeginTrans;
try
  ....
  ADOConnection.CommitTrans;
  showmessage('提交成功');
except
  AdoConnection.RollbackTrans;
  showmessage('提交失败');
end;这样的话错误信息简单了一点，我想把Ado原生的错误信息也显示出来，以便于发现错误，该如何写呢

Answer 1

ADOConnection.BeginTrans;
try
  ....
  ADOConnection.CommitTrans;
  showmessage('提交成功');
except
  raise;
  AdoConnection.RollbackTrans;
  showmessage('提交失败');
end;

Answer 2

ADOConnection.BeginTrans;
try
  ....
  ADOConnection.CommitTrans;
  showmessage('提交成功');
except
    ON E: Exception Do ShowMessage(E.Message);
end;

Answer 3

except
    ON E: Exception Do ShowMessage(E.Message);
end;
赞同枫叶的方法

Answer 4

except
    ON E: Exception Do ShowMessage(E.Message);
end;
编译通不过啊
 Undeclared identifier: 'ON'

Answer 5

用异常语句：
try
  ...
except
  on E: Exception Do ShowMessage(E.Message);
end;就完全可以搞定了。

Answer 6

try
//    XXXXXXXX
except
    on e: exception do 
      ShowMessage(e.Message+e.classname);
      
end;