Bueno trabajo con esto, y aquie tiene tu respuestas
Procedure botonClick (var n: String);
var
Con:Inetger;
begin
Tabla.last // nos posicionamos en el ultimo registro
con:=Tabla.fieldbyname('ID').value + 1 ;\\ asignamos a una variable el
ultimo registro de la tabla y le agregamos o aumentamos uno mas
Tabla.insert \\ Insertamos nuevo registro
Tabla.fieldbyname('ID').value:= con; \\assignamos el numer consecutivo
end;
o tambien lo puedes hacer automatico en la base de datos de sql 200 en el campo de ID en su propiredad IDENTITY lo dejas como YES y te dara automatico el incremento.
Espero que sea de ayuda. alguna duda esta es mi correo
[email protected]