【结帖】dataNavigator的控制`**

chen20501157

请问:
     一个窗体中有多个docview,操作多个数据集,经常出现datanavigator错乱的问题,如何指定一个datanavigator固定控制一个docview?
    还有就是,datanavigator中的新增,删除实现的代码在哪里?我如何可以覆盖或者时修改其中的一部分功能?
  谢谢!

jiahaiminghr

http://bbs.justep.com/forum.php?mod=viewthread&tid=517

http://bbs.justep.com/forum.php?mod=viewthread&tid=3490

关于datanavigator，楼主可以参考用户手册

chen20501157

2、可以设计一组按钮，用ToolBar或者BitButton都可以，并连接系统提供的Action直接处理相应DataSet的Insert、Post等操作，以达到DataNavigator的效果

(我action里没有内容啊
?)
3、可以在DataNavigator的BeforeAction事件中截获到用户操作的那个按钮，代码示例如下：

  case TBizDataSetAction(Sender).ID of
      BizActnConsts.ActionDataSetFirst: ShowMessage('ActionDataSetFirst'); { 最前 }
      BizActnConsts.ActionDataSetPrior: ShowMessage('ActionDataSetPrior'); { 向前 }
      BizActnConsts.ActionDataSetNext: ShowMessage('ActionDataSetNext'); { 向后 }
      BizActnConsts.ActionDataSetLast: ShowMessage('ActionDataSetLast'); { 最后 }
      BizActnConsts.ActionDataFetch: ShowMessage('ActionDataFetch'); { 取下一页 }
      BizActnConsts.ActionDataFetchAll: ShowMessage('ActionDataFetchAll'); { 全部取 }
      BizActnConsts.ActionDataSetRefresh: ShowMessage('ActionDataSetRefresh'); { 刷新 }
      BizActnConsts.ActionDataSetFilter: ShowMessage('ActionDataSetFilter'); { 过滤 }
      BizActnConsts.ActionDataSetInsert: ShowMessage('ActionDataSetInsert'); { 插入 }
      BizActnConsts.ActionDataSetCopyInsert: ShowMessage('ActionDataSetCopyInsert'); { 插入复制 }
      BizActnConsts.ActionDataSetAppend: ShowMessage('ActionDataSetAppend'); { 新增 }
      BizActnConsts.ActionDataSetCopyAppend: ShowMessage('ActionDataSetCopyAppend'); { 新增复制 }
      BizActnConsts.ActionDataSetCancel: ShowMessage('ActionDataSetCancel'); { 取消 }
      BizActnConsts.ActionDataSetDelete: ShowMessage('ActionDataSetDelete'); { 删除 }
      BizActnConsts.ActionDataSetSave: ShowMessage('ActionDataSetSave'); { 保存 }
    ......
  end

这段代码具体在么用啊?能给个例子吗?

jiahaiminghr

这段代码是写在DataNavigator的BeforeAction事件中

chen20501157

BizActnConsts.ActionDataSetAppend: ShowMessage('ActionDataSetAppend'); { 新增 }
这里的新增是不是替换成我自己的代码?

jiahaiminghr

不是，这是个注释

自showmessage位置，你可以写自己的代码

chen20501157

2、可以设计一组按钮，用ToolBar或者BitButton都可以，并连接系统提供的Action直接处理相应DataSet的Insert、Post等操作，以达到DataNavigator的效果

(我action里没有内容啊
?)

chen20501157

比如我要在点击新增按纽的时候,弹出这样一个窗体的代码,
代码应该写在BizActnConsts.ActionDataSetAppend: 的后面吗>?
var

  lForm:  TXKZMX_Form;
begin
  lForm :=  TXKZMX_Form.Create(self.Context);
  try
    lForm.ShowModal;
  finally
    lForm.Free;
  end;
  end;

jiahaiminghr

关于对ActionList的操作，楼主可以参考一下delphi
这是一个delphi的控件

chen20501157

ok,解决了,谢谢