Question

在Delphi中使用BDE如何执行事务处理？？

如题，给个例子

Answer 1

delphi中完成事务的过程由tdatabase来实现.tdatabase的.starttransation 起一个事务,commit 提交事务, rollback 回滚事务.tdatabase一次只能一个事务,即不同有嵌套使用.一般事务的处理和try..except..end 合用.如:
Database1.StartTransation;
Try
Query1.sql.add(‘update table1 set field1=’a’ where field2=’b’’);
Query1.ExecSQL;
Query1.sql.Clear;
Query1.sql.add(‘update table2 set field1=’a’ where field2=’b’’);
Query1.ExecSQL;
Database1.Commit;
Except
Database1.RollBack;
End;

明白了么，记得给分啊、