以文本方式查看主题

-  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)

--  作者:sanyotaiyo
--  发布时间: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 = "管理员")


--  作者:sanyotaiyo
--  发布时间: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事件试一试!
--  作者:sanyotaiyo
--  发布时间:2012/3/23 10:15:00
--  
OK了!图片点击可在新窗口打开查看