Fehlermeldung unterbinden und Code weiter ausführen

[Kirchi]

Hallo zusammen,

ich habe folgendes Problem. Ich möchte Exceptions bei einem Datenbankpost abfangen und das Programm soll in der Schleife weiterlaufen . Folgende Code habe ich:

Delphi-Quellcode:

repeat

..


  try
    dm.qry_files.post;
  except
    on e:exeption do
    begin
        lst_errors.items.add('Fehler: der Post bei folgender Datei ist fehlgeschlagen:');
    end;
  end;

..

dm.qry_folders.next;
until dm.qry_folders.ext;

leider bleibt das Programm stehen und die while schleife wurde beendet.

Im Voraus schon mal besten Dank!

[Mavarik]

In der IDE?

Mavarik

[Kirchi]

Nein, ausserhalb der IDE.

Build als Release.

[Bummi]

häng mal ein

dm.qry_files.Cancel; in Deine Exception Behandlung

[Kirchi]

Schande über mein Haupt.

Da hätte ich auch selbst drauf kommen müssen.

Danke Bummi.