【结帖】如图**

zfang

或者是接管DataNavigator的动作事件：onbeforeaction
然后代码处理，一样的效果！具体代码论坛里搜索，很多

ktworld

大哥帮帮手

zfang

比如参考下面的代码
procedure TMAINFORM.DataNavigatorBeforeAction(Sender: TObject; var Accept: Boolean);
begin
  case (Sender as TBizDataSetAction).ID of
    BizActnConsts.ActionDataSetDelete:
    begin
        if  DataSetBroker1.DataSet.FieldByName('aa').asString = 'a' then
        begin
           jsDialogs.ShowMsg('不允许删除！','');
           Accept := False;
        end;
    end;
end;

ktworld

OK

zfang

好，结帖！