So hab ich das bis jetzt auch hinbekommen.
Das ist aber falsch !
Wenn nämlich Einträge geändert oder gelöscht werden, dann stimmts nicht mehr.
Ich habs jetzt, so funktioniert es......
Delphi-Quellcode:
procedure Tform1.Zeilennummern_eingeben;
var i:Integer;
begin
for i := 1 to Form1.Clientdataset2.recordcount do
begin
form1.ClientDataSet2.Recno := i;
form1.ClientDataSet2.Edit;
form1.ClientDataSet2Nr.AsInteger:= form1.ClientDataSet2.Recno ;
end;
end;