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;