Problem mit Autoinkrement

[Chris P]

Jetzt hab ich es, und zwar war der Befehl Table1.Edit an der falschen Stelle.

Delphi-Quellcode:

procedure TForm1.UpdateIndex();
var
   Index: Integer;
begin
   Index:=0;
   Table1.First;
     While Not Table1.EOF do
     begin
        Table1.Edit;// hier war der Fehler
        Table1.FieldByName('Nr').AsInteger:=Index;

        TRY
           Table1.Post;
        EXCEPT
           Table1.Cancel;
        END;
        Table1.Next;
        Inc(Index);
     end;
     //Table1.Browse; - dieser Befehl ist mir unbekannt
     Table1.first;

end;

Vielen Dank, ihr hab mir weitergeholfen :-D