Zusätzliche Spalte im DbGrid durchnummerieren

[marabu]

Ich kann nicht erkennen, wann und wo du deinen Code ausführst. Ich stelle mir das so vor, dass du im Object Inspector den Rahmen für das Ereignis OnCalcFields() erzeugst und dann diesen Code einfügst:

Delphi-Quellcode:

procedure TDemoForm.QueryCalcFields(DataSet: TDataSet);
begin
  with DataSet do
    FieldValues['NR'] := RecNo;
end;