[sanxpue]

Mi amigo cadetill

si Id es autonumérico.... ¿por qué le asignas un valor?
¡¡Nunca le da un valor al Autonumerico ahora si viste mal

Y bueno la cosa es que este tema se ha tratado muchas veces

Funciona bien si no lo van a usar varias instancias con un solo Last

Código Delphi [-]
var
   i, j, k : Integer;
begin
  ADOTable1.Append;
  ADOTable1Numero.AsInteger:= i;
  ADOTable1Nombre.AsString:= 'Número : ' +IntToStr(i);
  ADOTable1.Post;
  
  ADOTable1.Last;
  K := ADOtable1ID.AsInteger;
  
  // Ahora asignar a k el valor del campo Id del registro insertado en Tabla1
  for j:= 0 to 15 do
  Begin
    beginADOTable2.Append;
    ADOTable2Numero.AsInteger:= k;
  end;
  ADOTable2.Post;
End;

Ahora si lo van a usar varios no se si TADOTable tenga la opcion de exclusive