為什麼ado在batchupdata時抓不到錯誤信息呀。如何做呢？

Question

我用到了事務如
function TDM.SaveData(MastDataSet,DetailDataSet:TADODataSet):Boolean;
begin
  ADOConnection.BeginTrans;
  try
    MastDaTaSet.Edit;
    DetailDataSet.Edit;
    MastDataSet.UpdateBatch();
    DetailDataSet.UpdateBatch();
    ADOConnection.CommitTrans;
    Result:=True;
  Except
    AdOConnection.RollbackTrans;
    Result:=False;
    Showmessage('存檔失敗');
  end;
end;
如果是這樣的話後台前台出什麼錯我看不到，因為有try except end語句
如何在except後抓到原生出錯信息呢？

Answer 1

Except
    on e:Exception do
      Showmessage(e.Message); 
    AdOConnection.RollbackTrans;
    Result:=False;
    Showmessage('存檔失敗');
  end;