repeat - until abfrage

[Snyderburn]

Hi, ich habe ein kleines Problem mit einer Abfrage. Hier ist erstmal der Quellcode:

Delphi-Quellcode:

        dm1.T_anschrift.First;
        repeat
        if idzumbearbeiten = dm1.T_anschrift.fieldbyname('ID_anschrift').asinteger then
          begin
            ....
            bearbeitenzaehler := idzumbearbeiten;
          end
          else
          begin
            dm1.T_anschrift.Next;
            bearbeitenzaehler := bearbeitenzaehler + 1;
          end;
        until idzumbearbeiten = bearbeitenzaehler;

diese Schleife funktioniert fast ohne Probleme. Wenn der "dm1.T_anschrift.Next" zeiger auf dem 20. Datensatz zeigt dann kommt eben eine Fehlermeldung: Allgemeiner SQL Fehler!. Bis zum 20. Datensatz läuft es ohne Probleme. Auch die "Wahr" Abfrage funktioniert bis dahin. Naja, wie gesagt, ab dem 20. DS passiert nix mehr ausser die Fehlermeldung.
Woran kann das liegen?!?!

mfg
Snyderburn