软件提示“没有活动事务”原因以及解决办法

软件提示“没有活动事务”，
原因：使用事务时
Try
dm.ADOConnection1.BeginTrans;
1、--------sql语句------
dm.ADOConnection1.CommitTrans;
2、--------代码出现异常-------
excetp
dm.ADOConnection1.RollbackTrans;
end;
如上所示：
因为在事务结束后的代码2处出现异常，因此进入异常处理代码时的异常回滚时，就找不到了事务，因此提示“没有活动事务”
---------------------

解决办法：

   将代码2处的代码移至代码一下面即可或者事务结束语句放置except上面