Datenmodul alle Queries in einem schliessen

[josef-b]

Zitat von haentschman:

Zitat:

weil man manchmal in der Entwicklungs-Zeit die Transaktionen offen hat

...Sorry, in der Entwicklung (OI) Connection.Active = True , ist aber imho ein NoGo.

PS:
Ich arbeite auch mit Transaktionen. Wenn mein Programm "abschmiert" wegen Blödsinn im Quelltext, sollten damit auch die Connections geschlossen sein. Und damit sollten die Transaktionen, die zu den Connections, gehörten auch weg sein...Das regelt die Datenbank selbst.

Wenn du aber z.B. mit Devexpress Komponenten arbeitetest, wie das TcxGrid musst du ja mal z.B. die Felder/Spalten auslesen aus der DB, wenn Du nicht alles im Code eingeben willst....Und dann vergisst man auch mal ab und zu die Datenmenge zu schliessen...vor dem compilieren..

zur Not gehts eben mit Copy and Paste..aber ich wollte es etwas eleganter machen...

Delphi-Quellcode:

with IBQuery1 do
  begin
  if transaction.InTransaction then transaction.Commit;
  end;

with IBquery2 do
  begin
  if transaction.InTransaction then transaction.Commit;
  end;
.........