如何在Table或者Query中的BeforeDelete事件中写代码中止Delete操作

Question

如何在Table或者Query中的BeforeDelete事件中写代码中止Delete操作
我想在里面用个MessageBox来提示用户是否删除.不过知道怎么才能在用户选择取消的时候.可以中止Delete操作.
procedure TFormTryoutReg.ADOQuery1BeforeDelete(DataSet: TDataSet);
begin
  if Application.MessageBox('针对要删除这个记录吗?'
      ,'系统提示',1)=ID_OK then
  begin
     //这里不会写了.......  end;
end;

Answer 1

procedure TFormTryoutReg.ADOQuery1BeforeDelete(DataSet: TDataSet);
begin
  if Application.MessageBox('针对要删除这个记录吗?'
      ,'系统提示',1)=ID_OK then
  begin
    abort  end;
end;

Answer 2

点OK就执行删除，否则就Exit回滚就行了。

Answer 3

abort????
就这么简单吗????????????????????????????????????????????晕.
太感谢了.高手就是能用最简单的方法解决我认为最难的问题.呜呜.感动.