update failed ?

[ada]

Hallo,

ja ich habe Schreibrechte und kann Datensätze einfügen.
Ich habe meine Zweifel, ob es wirklich am Code liegt. Dieser Fehler tritt sporadisch auf. Wie gesagt danach kann ich bestimmte Datensätze nicht mehr löschen. Ich kann auch nicht mit Sicherheit sagen, ob dieser Fehler nach dem Anlegen eines neuen Datensatezes auftritt, oder es nach mehrmaligen Löschen von Datensätzen auftritt.

hier nochmal der Code:

Delphi-Quellcode:

              begin//2
                  try
                   SQLSpritzgangTabelle.Delete;      // Datensatz löschen
                 except
                   SQLSpritzgangTabelle.Cancel;   
                  raise;
                  end;
               end;//2
              if SQLSpritzgangTabelle.UpdatesPending then    // SQL Datenmenge aktualisieren
                begin //4
                 try
                  SQLSpritzgangTabelle.ApplyUpdates;
                 except
                 raise; {raise the exception to prevent a call to CommitUpdates!}
                 end;
                 If  lokalgeloeschteDateiaktiv  then
                  begin //5
                     sAktivesProgramm := SQLSpritzgangTabelle.FieldByName('PRGNAME').AsString;
                    ModalResult := mrOk;
                   end;//5
                end;//4