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!