以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  窗口中的菜单如何获取  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=138384)

--  作者:落落155
--  发布时间:2019/7/30 10:58:00
--  窗口中的菜单如何获取
在窗口中通过菜单编辑器 增加了工具栏,如何能在窗口加载的时候,获得这个菜单,实现权限判断。如下图,能实现没有某项操作权限的时候,该按钮显示灰色被禁用吗?
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/7/30 11:21:00
--  
在窗口afterload事件处理即可

http://www.foxtable.com/webhelp/topics/3220.htm

if 某某权限判断
Dim sit As WinForm.StripItem = e.Form.Strips("工具栏1").Items("Print")
sit
.Enabled = False