Foxtable(狐表)用户栏目专家坐堂 → MainTableChanged在切换窗口表时,不执行里面的代码呢?


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

主题:MainTableChanged在切换窗口表时,不执行里面的代码呢?

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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
MainTableChanged在切换窗口表时,不执行里面的代码呢?  发帖心情 Post By:2016/11/26 16:07:00 [只看该作者]

MainTableChanged写入代码;
图片点击可在新窗口打开查看此主题相关图片如下:aa.jpg
图片点击可在新窗口打开查看
Dim str() As String = {"字典","供应商","分包","客户","亲朋","股东","施工合同"}
Dim str1() As String = {"增加金额","应付增加","应付增加","应收增加","应付增加","应付增加","合同主要内容"}
For i As Integer = 0 To str.Length -1
    If MainTable.Name = str(i) Then
        DataTables(str(i)).DataCols(str1(i)).RaiseDataColChanged()
    End If
Next
在FT的表间页签切换时,执行。
为什么在登录软件后,窗口的主表table里面切换 ,不执行呢?(都是主表,不是副本表)
[此贴子已经被作者于2016/11/26 16:15:10编辑过]

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/26 16:30:00 [只看该作者]

窗口表只能触发CurrentTableChanged


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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
  发帖心情 Post By:2016/11/26 16:36:00 [只看该作者]

把代码放到:CurrentTableChanged,还是不行呢?
是不是因为,窗口中:所有都表,都一样的原因?

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/26 16:46:00 [只看该作者]

所有都表,都一样?同一个表?主表不可能同时出现在多个地方的。只要是不同的表,肯定会触发CurrentTableChanged

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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
  发帖心情 Post By:2016/11/26 16:52:00 [只看该作者]

我的主表窗口:的,所有者表,都 是:功能导航,表;是不是这个问题?

我试了一下,好像表切换,能行。
哪,这个代码不对?
[此贴子已经被作者于2016/11/26 17:01:50编辑过]

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/26 17:04:00 [只看该作者]

和所有者表没有一点关系。

你的窗口要有表格,并且表格不是隐藏的,然后从其它的活动表格变为当前表格是活动状态,才可以触发CurrentTableChanged

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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
  发帖心情 Post By:2016/11/26 17:05:00 [只看该作者]


Dim str() As String = {"字典","供应商","分包","客户","亲朋","股东","施工合同"}
Dim str1() As String = {"增加金额","应付增加","应付增加","应收增加","应付增加","应付增加","合同主要内容"}
For i As Integer = 0 To str.Length -1
    If CurrentTable.Name = str(i) Then
        DataTables(str(i)).DataCols(str1(i)).RaiseDataColChanged()
    End If
Next

可以了。

 回到顶部