Controlar el post y edit de un TDBNavigator

[sanxpue]

Porque no funciona esto

procedure TfrmArticulos.DBNavigator1BeforeAction(Sender: TObject;Button: TNavigateBtn);
begin
//  if (frmPrincipal.TablaArticulos.State = dsInsert) or    (frmPrincipal.TablaArticulos.State = dsEdit) then
//begin
  if (dbNombre.Text = '') or (dbDescripcion.Text = '') or
    (dboCategoria.Text = '') or (dbPrecio.Text = '') or
    (dboLocal.Text = '') then
   begin
      ShowMessage('Registro no guardado: Debe Rellenar todos los campos');
    frmPrincipal.TablaArticulos.Cancel;

end;
// end;
end;

Pues por que en lugar de reconocer

if (dbNombre.Text = '') or (....

deberias de mandar

if (frmPrincipal.TablaArticulos.FieldByName('Nombre').AsString = '') Or (.....