Foxtable(狐表)用户栏目专家坐堂 → 临时表事件


  共有6134人关注过本帖树形打印复制链接

主题:临时表事件

帅哥哟,离线,有人找我吗?
307587760
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
临时表事件  发帖心情 Post By:2015/8/18 17:30:00 [只看该作者]

请问老师:临时表有事件么?我想在DataColChanged 里面写一个表达式
A列发生变化的时候,C列=A列*B列
可是没有写事件的地方呢?全局表的事件好像也没起作用。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/18 17:42:00 [只看该作者]

临时表建立后,要开启事件

 

DataTables("临时表").GlobalHandler.DataColChanged = True

 


 回到顶部
帅哥哟,离线,有人找我吗?
307587760
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:134 积分:1037 威望:0 精华:0 注册:2014/12/15 10:51:00
  发帖心情 Post By:2015/8/18 19:40:00 [只看该作者]

非常感谢

 回到顶部
帅哥哟,离线,有人找我吗?
HappyFt
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1930 积分:17558 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2023/2/22 23:23:00 [只看该作者]

为什么这样创建的临时表事件不执行

'生成临时表
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("请购单号", GetType(String), 16)
dtb.AddDef("产品编码", GetType(String), 16)
dtb.AddDef("品名", GetType(String), 50)
dtb.AddDef("规格", GetType(String), 50)
dtb.AddDef("计量单位", GetType(String), 4)
dtb.AddDef("请购数量", GetType(Double))
dtb.AddDef("采购数量", GetType(Double))
dtb.AddDef("需求日期", GetType(Date))
dtb.AddDef("单价", GetType(Double))
dtb.AddDef("金额", GetType(Double))
dtb.AddDef("交货日期", GetType(Date))
Dim tbl2 As Table = Tables(e.Form.Name & "_采购明细")
'开启临时表事件
DataTables(tbl2.Name).GlobalHandler.PrepareEdit = True
DataTables(tbl2.Name).GlobalHandler.DataColChanged = True

tbl2.DataSource = dtb.Build()

这种情况怎样才能让表事件执行?

谢谢!

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110553 积分:562655 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/2/23 8:05:00 [只看该作者]

不应该犯这种错误啊,临时表还没有生成,还不存在,设置有什么用!先生成临时表,再去设置临时表的各种属性

 回到顶部
帅哥哟,离线,有人找我吗?
HappyFt
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1930 积分:17558 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2023/2/23 14:29:00 [只看该作者]

'生成临时表
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("请购单号", GetType(String), 16)
dtb.AddDef("产品编码", GetType(String), 16)
dtb.AddDef("品名", GetType(String), 50)
dtb.AddDef("规格", GetType(String), 50)
dtb.AddDef("计量单位", GetType(String), 4)
dtb.AddDef("请购数量", GetType(Double))
dtb.AddDef("采购数量", GetType(Double))
dtb.AddDef("需求日期", GetType(Date))
dtb.AddDef("单价", GetType(Double))
dtb.AddDef("金额", GetType(Double))
dtb.AddDef("交货日期", GetType(Date))
'dtb.Build()

Dim tbl2 As Table = Tables(e.Form.Name & "_采购明细")
tbl2.DataSource = dtb.Build()

'开启临时表事件
DataTables(tbl2.name).GlobalHandler.PrepareEdit = True
DataTables(tbl2.name).GlobalHandler.DataColChanged = True

'DataTables("统计").GlobalHandler.PrepareEdit = True
'DataTables("统计").GlobalHandler.DataColChanged = True

因为这个临时表打开窗口生成后是要绑定到窗口表中的,所以不知道怎么设置,
如果用绑定的表名设置事件开关会出错,用原来的统计表名设置又不起作用,


 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110553 积分:562655 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/2/23 14:59:00 [只看该作者]

tbl2.DataSource = dtb.BuildDataSource ()
tbl2.DataTable.GlobalHandler.PrepareEdit = True

 回到顶部