- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]窗口附表打开隐藏列问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17747)
-- 发布时间：2012/3/23 9:29:00
-- [求助]窗口附表打开隐藏列问题
窗口附表打开隐藏列问题,
表A.表B关联
在表A增加出口"AB1" 【按KeyDown打开】,表A.表B为非副本；
AfterLoad:If User.name = "XXX"
Tables("表A.表B").Cols("第三列").Visible = False
End If
在表B增加出口"AB2" 【按KeyDown打开】,表A.表B为副本；
AfterLoad:If User.name = "XXX"
Tables("表A.表B").Cols("第三列").Visible = False
End If
在表A中得窗口“AB1”中“第三列”被隐藏；在表B中的窗口“AB2”中“第三列”没有被隐藏；
问题：如何是现在表B中打开窗口“AB2"后隐藏"第三列”？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:窗口附表打开隐藏列问题.foxdb |
[此贴子已经被作者于2012-3-23 9:32:54编辑过]
-- 发布时间：2012/3/23 9:38:00
--
AfterLoad事件代码改为这样试试，建议类似的问题先搜索在提问，这样的问题论坛的回答已经很多了：
Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")
-- 发布时间：2012/3/23 9:59:00
--
我在表A窗口“AB1"
AfterLoad:
Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")
在表A用"XXX"用户打开窗口"AB1"，可以隐藏第三列，
问题
我在表B窗口“AB2"
AfterLoad:
Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")
在表B用"XXX"用户打开窗口"AB2"，不能隐藏第三列，
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:窗口附表打开隐藏列问题.foxdb |
-- 发布时间：2012/3/23 10:09:00
--
记住了：关联表要在父表打开才有效，在子表的窗口打开新增或者删除记录会有错误，包括一些事件的取值，因此，您写在表A的AB1窗口的AfterLoad事件试一试！
-- 发布时间：2012/3/23 10:15:00
--
OK了！
