Query SQL Transaktionen

[Starworld1000]

Hallo alle zusammen

Ich hatte in der Vergangenheit ein Programm gebastelt, das über eine Datenbank Werte anzeigt.
Es blieben jedoch immer offene Transaktionen die ich nicht mit COMMIT abgeschlossen wurden.

Da ich mich gerade erst in dieses Thema Transaktionen COMMIT und Rollback befasst habe, habe ich schnell mal ein Testprogramm geschrieben.

Jetzt weis ich nur nicht, ob das oben genannte Problem damit gelöst wäre?

Delphi-Quellcode:

...
try
 if not ADOConnect.Connected then ADO.Open;
        ADOConnect.BeginTrans;
        AdoQuery.Active  := False;
        AdoQuery.SQL.Text:='SELECT POS FROM TABLE WHERE POS Like ('''+'Position38%'+''')';
        AdoQuery.Active  := True;
        AdoQuery.First;
        ADOConnect.CommitTrans;
      except
        ADOConnect.RollbackTrans;
end;
...

Ist der Code so richtig ?
Könnt ihr mir weiterhelfen ?


Liebe Grüße Starworld1000