[LordRF]

Hola Jose,

no se si te puedo ayudar ya que no trabajo con access, pero me imagino que tambien access tiene un autoinc, que incrementa automaticamente el Nr. de registro y si no lo puedes hacer a mano

var
form: Tform;
nr : longint;

procedure TForm.TableBeforeInsert(DataSet: TDataSet);
begin
  Dataset.Last;
  Nr := Dataset.FieldByName('Campo').AsInteger + 1;
end;

procedure TFom.TableNewRecord(DataSet: TDataSet);
begin
  Dataset.FieldByName('campo').AsInteger := Nr;
end;

un saludo