DBnavigator abfrage ob feld eingetragen ist

[Schuby]

so gehts auch nicht. Kein Eintrag möglich.

if DBemail.DataField macht mir probleme, bei der abfrage kommt immer false raus.

Delphi-Quellcode:

procedure TForm1.DBNavigator1BeforeAction(Sender: TObject;
  Button: TNavigateBtn);
  var ok : boolean;
begin
  ok:= false;
  if DBemail.DataField <> '' then
  begin
    ok:= false
  end else
  begin
    ok:= true;
  end;

  case Button of
    nbPost : if (ok = false) then abort;
  end;
end;

mfg