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