トランザクションを使用する

 トランザクションとはデータの一貫性を保証するための機能です。トランザクションの説明はヘルプを参照して下さい。
 トランザクションの機能はすべて TDatabaseのメソッドで提供されています。トランザクションを開始する StartTransactionメソッド、トランザクションを適用する Commitメソッド、トランザクションを廃棄する Rollbackメソッドです。
また、現在、トランザクション中かどうかを InTransactionプロパティで調べることが可能です。

■ トランザクションを使用した例
procedure TForm1.Button1Click(Sender: TObject);
begin
  if  Not Database1.InTransaction then  begin
    Database1.StartTransaction;  //トランザクション開始
  end;
  //
  //  なんか更新処理
  //
  if  MessageDlg('適用しちゃう?',mtWarning,[mbYes,mbNo],0) = mrYes then
  begin
    Database1.Commit;      //適用
  end else begin
    Database1.Rollback;    //廃棄
  end;
end;