DBNavigator и кнопка Post

[jenny]

Всем Привет!

Использую DBNavigator и DBGrid для записи в базу данных. Хотелось бы, чтобы при нажатии на кнопку Post, фиксация новой записи была отменена, если условие верно. Подскажите как бы мне это сделать? Пробовала команды Exit, Abort, ничего не происходит....

[mig-31]

Код: Выделить всё

  procedure TForm1.DBNavigator1Click(Sender: TObject; Button: TDBNavButtonType);
begin
  if ((ADOQuery1.FieldByName('firstname').asString) <> '') or ((ADOQuery1.FieldByName ('lastname').asString) <> '')  then
    if Button = nbPost then begin
 
    end;
  else  Showmessage('Please fill your fist and last name');
end;


[jenny]

спасибо