【结帖】[重要]不知如何是好

cdz0451 · 发表于 2007-9-20 10:26:02

想在功能窗体里，在点击 DataNavigator 保存之前，触发数据源中某个字段的OnExit事件

补充说明：
数据集中有字段：总价＝单价 ×　数量

在修改单价或数量时，如何自动生成总价
总价在界面上不显示

zfang · 发表于 2007-9-20 10:37:46

楼主，首先把这个计算最好放到信息层中处理，可以在数据集的字段编辑器上增加数据字段
然后在字段上的onexit事件中作处理！

jiahaiminghr · 发表于 2007-9-20 10:39:31

可以在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

cdz0451 · 发表于 2007-9-20 10:40:01

我现在说的就是这个想法
不过遇到了个问题！就是在功能窗体里，修改数量或单价时，鼠标直接点击保存！
这个时候是不会触发 OnExit
所以相同如何能更好的解决！

TO 3楼：
这个我知道
不过好像不是我说的意思！

zfang · 发表于 2007-9-20 10:40:17

当然了，你要在功能里做也可以，可以用一个数据集代理控件访问该数据集，然后在这个控件的beforepost事件中处理，也可以通过在DataNavigator 的beforeaction事件中作处理（3楼说的就是那些动作），这里的解决方法就是把你得OnExit的处理逻辑放到这里来做

cdz0451 · 发表于 2007-9-20 10:42:10

噢
有点意思了！我实验一下！
拿到功能层看看在 DataNavigator 的beforeaction事件中作处理一下

zfang · 发表于 2007-9-20 10:43:45

4楼，你说的应该是没处理好，应该让焦点离开你编辑的单价或者数量之类的，否则不会触发字段的OnExit事件的，具体你跟踪看看！

cdz0451 · 发表于 2007-9-20 10:52:38

在 DataNavigator 的beforeaction事件中作处理的想法我想能通过
不过，我不太知道如何通过视图来获得用户输入的数值！
例如：vNum := DocView1.Info.FindField('FIELD_KCXX_DJ','DJ').AsInteger;
不知道如何才能获得用户输入项

cdz0451 · 发表于 2007-9-20 10:55:47

TO 7楼：
是的，我在 DataNavigator 的beforeaction事件中
切换了一下焦点，触发了！
我想问题解决了！
谢谢大家

zfang · 发表于 2007-9-20 11:04:12

8楼，你用数据集代理控件阿！
datasetbroker.dataset.FieldByName('字段').AsInteger！
其实，对于数据集的操作，最好是在信息层里做。在功能里也可以做，不过需要一些代理控件或者数据库相关的控件

楼主，你需要好好看看用户手册！

		自动登录	找回密码
密码			立即注册