私はDelphi 2010をFIB Components
likeTpFIBDataset
とデータベースで使用TpFIBTransaction
しTpFIBDataset
ています。Firebird
私はすでに TpFIBDataset の 'AutoCommit' プロパティを 'False' に設定しており、try..finally
ブロック内で以下のステートメントを実行してロールバックすると、トランザクション データは引き続きポストされます。
コード:
FIBDataset.Post;
以下はサンプルコードです。
コード:
try
FIBDatabase.StartTransaction;
....
Block of Code;
...
finally
if saveALL then
FIBDatabase.CommitRetaining
else
FIBDatabase.RollbackRetaining;
end;