FireDAC.Comp.Client.TFDCustomConnection.Rollback
Delphi
procedure Rollback;
C++
void __fastcall Rollback();
Inhaltsverzeichnis
Eigenschaften
Typ | Sichtbarkeit | Quelle | Unit | Übergeordnet |
---|---|---|---|---|
procedure function |
public | FireDAC.Comp.Client.pas FireDAC.Comp.Client.hpp |
FireDAC.Comp.Client | TFDCustomConnection |
Beschreibung
Annulliert alle Datenänderungen, die in der aktuellen Transaktion vorgenommen wurden, und beendet optional die Transaktion.
Mit Rollback annullieren Sie alle Änderungen (wie z. B. diejenigen, die von INSERT-, UPDATE- oder DELETE-Anweisungen verursacht wurden) dauerhaft, die in der aktuellen Transaktion an der Datenbank vorgenommen wurden.
FireDAC unterstützt verschachtelte Transaktionen, daher handelt es sich bei der aktuellen Transaktion um diejenige, die zuletzt mit einem StartTransaction-Aufruf gestartet wurde. Wenn die Datenbank keine verschachtelten Transaktionen unterstützt, wie die meisten DBMSs, dann emuliert FireDAC verschachtelte Transaktionen anhand von Speicherpunkten.
Vor dem Aufruf von Rollback kann in einer Anwendung der Status der Eigenschaft InTransaction überprüft werden. Wenn in einer Anwendung Rollback aufgerufen wird, obwohl keine aktuelle Transaktion vorhanden ist, wird eine Exception ausgelöst.
Ein Rollback-Aufruf für InterBase/Firebird schließt alle diesem Transaktionsobjekt zugeordneten Datenmengen und Anweisungen und hebt deren Vorbereitung auf. Bei einigen anderen DBMSs (z. B. bei MS SQL Server 2005) verwirft ein Aufruf von Rollback alle aktiven Ergebnismengen. Verwenden Sie die Methode ReleaseClients, um FetchAll für aktive Datenmengen zu erreichen.
Der Aufruf von Rollback ist eine Kurzform für Transaction.Rollback, wenn die Eigenschaft Transaction zugewiesen ist. Ansonsten arbeitet Rollback mit der Transaktion der Standardverbindung.
Beispiel
procedure TForm1.DoThatButtonClick(Sender: TObject);
begin
FDConnection1.StartTransaction;
try
if CustomerQuery.Locate('ID', [100]) then begin
CustomerQuery.Edit;
CustomerQuery.FieldByName('status').AsString := 'top';
CustomerQuery.Post;
FDConnection1.ExecSQL('delete from debt where CustID = 100');
FDConnection1.CommitRetaining;
end;
except
FDConnection1.RollbackRetaining;
raise;
end;
end;