Pongo este codigo y no me va, soy nuevo en esto de programacion y seguro que me dejo algo pero no se el que:
Código Delphi
[-]
procedure TAltaClientes.FormCreate(Sender: TObject);
var
Ultimo : Integer;
begin
Ultimo := ADONumeros.FieldByName('CodClientes').Value + 1;
ADOClientes.Insert;
ADOClientes.FieldByName('CodCliente').Value := Ultimo;
ADOClientes.Post;
ADONumeros.Edit;
ADONumeros.FieldByName('CodCliente').Value := Ultimo;
ADONumeros.Post; begin
ADOClientes.Active:= True;
end;
se me para en adonumeros
Gracias