registro vacio not null..!!

[negrokau]

buenas.... como uso este? o donde lo ubico?

Código Delphi [-]
IBQuery1.FieldByName('TU_CAMPO').Required:= True;

[ecfisa]

Empezado por negrokau

buenas.... como uso este? o donde lo ubico?

Código Delphi [-]
IBQuery1.FieldByName('TU_CAMPO').Required:= True;

Hola.

Se usa tál como está en el código.

Donde ubicarlo ? Puede ser en el evento OnCreate u OnShow del form donde está declarado el TIBQuery.
Eso sí, tomá en cuenta que "TU_CAMPO" debe ser reemplazado por el nombre que le diste al campo en la creación de la tabla.

Por ejemplo:

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  IBDataSet1.FieldByName('NOMBRE_DEL_CAMPO').Required:= True;
  ...
end;

Si intentás guardar un registro en el que el campo "NOMBRE_DEL_CAMPO" no tenga un valor asignado, recibirás el mensaje:

Es necesario que el campo 'NOMBRE_DEL_CAMPO' contenga algún valor

Saludos.

[negrokau]

Probe como me sugeriste pero no funciona

Código Delphi [-]
procedure TF_COMPRAS.FormCreate(Sender: TObject);
begin
DM.Q_COMPRAS.FieldByName('FECHA').Required:=True;
DM.Q_COMPRAS.FieldByName('CANTIDAD').Required:=TRUE;
DM.Q_COMPRAS.FieldByName('IMPORTE').Required:=True;

end;

sera que algo hice mal?

[ecfisa]

Hola.

Empezado por negrokau

Probe como me sugeriste pero no funciona

Código Delphi [-]
procedure TF_COMPRAS.FormCreate(Sender: TObject);
begin
  DM.Q_COMPRAS.FieldByName('FECHA').Required:=True;
  DM.Q_COMPRAS.FieldByName('CANTIDAD').Required:=TRUE;
  DM.Q_COMPRAS.FieldByName('IMPORTE').Required:=True;
end;

sera que algo hice mal?

No, no hay nada mal, la asignación a la propiedad es correcta y tendría que funcionar.

Leyendo en tu primer post:

uso interbase y query

Veo que usas un IBQuery por lo que te hago una consulta: ¿ Como estas realizando la inserción del registro, tenés un IBUpdateSQL asociado al IBQuery?

Sería útil poder ver algo del código que usas para hacer la inserción.


Saludos.