TIBTransaction.Commit schließt Datenverbindung?

[Artur]

Hi,

ich habe es bisher mit TBookmark gemacht.
Da dürfte doch auch nichts dagegen sprechen:

Delphi-Quellcode:

procedure TProjectForm.StartNewTransaction;
var
  aBookmark : TBookmark;
begin
  with DM1 do begin
    aBookmark := ProjGridQuery.GetBookmark;
    if IBTransaction1.InTransaction then IBTransaction1.Commit;
    IBTransaction1.StartTransaction;
    ProjGridQuery.Open;
    ProjGridQuery.GotoBookmark(aBookmark);
  end;
end;

Ciao,

Artur