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