EdatabaseError problems

[domkop]

i never worked with databases before so now i got the problem that i have a required field that if i leave it empty raises the error: edatabase error field must have a value.
how do i have to deal with this error??
what am i doing wrong

procedure Tnamenoverzicht.bewaarClick(Sender: TObject);
//bewaar knop
begin
try
namen.Post;
except
on EDatabaseError do
MessageDlg('field is empty', mtwarning,[mbok], 0) ;

 

[hilfy]

I would validate that the field is not empty BEFORE you post. Something like this:

procedure Tnamenoverzicht.bewaarClick(Sender: TObject);
//bewaar knop
begin
  if table.fieldByName('KeyField').IsNull then
  begin
    ShowMessage('KeyField cannot be blank.');
    Edit1.SetFocus;  //put the cursor in the field that can't be blank...
  end
  else
    namen.Post;
end;

-Dell