Actualizar campo autonumerico

[[Caral]]

Hola Moparova
Me alegro que allas solucionada el problema.
Ahora solo te queda presentarnos como quedo.
Es una buena politica del club que se presenten las soluciones, ya que otros podran darse cuenta de como quedo y aprender tambien.
Saludos

[Moparova]

Si por supuesto, lo unico que hice fue eliminar eldel objeto TTable el campo autonumerico, y asi no tiene ningun problema para guardarlo. En la base de datos se actualiza automaticamente.

Gracias a todos por la ayuda prestada.

[jacanche]

Ten en cuenta que si luego vas a usar el valor de la llave, para por ejemplo, asignarle valor a una llave foranea de otra tabla, ya no vas a poder obtener el valor del campo llave, en vez de quitar el campo de la lista de campos en el editor de campos, dejalo, pero cambiale su propiedad required a false. con esto ya no te envia el error que le hace falta un valor.

[Moparova]

Mil graciascambie la propiedad Required a False, y ya pude trabajar perfectamente con los indices de la tabla.

Gracias por su ayuda

[JoseAntonio]

tambien tengo el mismo problema al utilizar el siguiente codigo en una tabla sql server en que idcliente es la clave principal y es numerica

Código Delphi [-]
DM_Datos.ADO_TCliente.Append;
  DM_Datos.ADO_TCliente.FieldByName('NumeroCliente').AsInteger := StrToInt(edNumeroCliente.Text);
  DM_Datos.ADO_TCliente.FieldByName('Nombres').AsString := edNombres.Text;
  DM_Datos.ADO_TCliente.FieldByName('Apellidos').AsString := edApellidos.Text;
  DM_Datos.ADO_TCliente.FieldByName('Direccion').AsString :=   DM_Datos.ADO_TCliente.FieldByName('DNI').AsString := edDNI.Text;
  DM_Datos.ADO_TCliente.FieldByName('Observaciones').AsString := edObservaciones.Text;
  DM_Datos.ADO_TCliente.Post;
  DM_Datos.ADO_TCliente.Refresh;

tengo este error:

No se puede insertar el valor NULL en la columna idcliente tabla aaaa.bbbb. La columna no admite valores null. insert falla

alguien sabe una forma mas economica de hacerlo, sin necesidad de usar

Código Delphi [-]
AdoQuery1.SQL.Text := 'Select Max(id_Cliente) From Tclientes';

      AdoQuery1.Open;

 
      Edit1.Text  := IntToStr(AdoQuery1.Fields[0].AsInteger+1);

 
      AdoQuery1.Close;

Gracias de antemano

Edit: Bueno les cuento que ya lo solucione, solo era cuestion de activar la opcion identidad a si en SQL Server 2000, mis tablas aunque tenian clave primaria, no tenian esa opcion activada en las claves