专家坐堂-快捷菜单依权限显示Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  快捷菜单依权限显示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194929)

--  作者：fntfgz
--  发布时间：2025/2/7 11:11:00
--  快捷菜单依权限显示
首先我设置了一全局变量usergroup，我想只有usergroup=” 开发者“的用户，在列的快捷菜单中显示”隐藏列“，”取消隐藏列“，其它用户组，不再列的快捷菜单中显示这两个命令，请问如果设置

--  作者：有点蓝
--  发布时间：2025/2/7 11:18:00
--
参考：http://www.foxtable.com/webhelp/topics/2438.htm

项目AfterOpenProject事件

If usergroup = "开发者" Then
  ContextMenus("Cell").Items("ColMenu").Items("Hide").Visible=true
Else
  ContextMenus("Cell").Items("ColMenu").Items("Hide").Visible=false
End If