客户端如何实现事务处理？

[ShapeRock]

我用的是Delphi7 的ADO。
ADOQuery1.post();
ADOQuery2.post();
ADOQuery3.post();
如果这三个中有一个出现错误，将全部回滚。如何实现？

[CABO]

在开始前
AdoQry.Connection.BeginTrans;
出错时

[CABO]

AdoQry.Connection.RollbackTrans;
成功时：
AdoQry.Connection.CommitTrans;

，也可以直接使用数据库的事务，写在执行的SQL语句里面（begin tran 使用sql语句)