一个关于右键弹出式菜单的问题，高手们帮个忙，急急急。。。。。。

[xymsgw]

问题是，如何写代码才能将右键菜单中的选项，显示灰色不可用，就好像enabled=.f.一样。

小弟就是想，不同身份的用户进入软件后，右键菜单中的选项可用性是不同的，从而达到不同权限的功能。

十分感谢，

[xymsgw]

up

[coolyylu]

如
SET SKIP OF BAR 1 OF popEdit nUserLevel > 2

[wwle]

你对应每个右建菜单选项：对应一个数组的每个成员（逻辑值） 不可用置为真！就行了。
当然更具没个用户，对数组元素进行操作 =.t. 或 =.f.

[xymsgw]

还是不很明白，能不能更具体点，十分感谢。能说明一下原理吗？

[yanzhigang]

UP

[cdbqss1]

同意楼上意见。
具体而言，实现步骤是：
第一步：是根据菜单项的多少，定义一个逻辑型的数组；
第二步：根据用户权限，设置数组的值；
第三步：在定义菜单时，使用set skip of 命令。

[magnetmoon]

關鍵是定義菜單時要有下面一句 ... SKIP FOR showwhat1
DEFINE BAR 1 OF shortcut PROMPT "加到我的最愛(\<A)..." SKIP FOR showwhat1
然后對變量showwhat1賦不同的值就可以了


form1.init()

public showwhat1,showwhat2
DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF shortcut PROMPT "加到我的最愛(\<A)..." SKIP FOR showwhat1
DEFINE BAR 2 OF shortcut PROMPT "\-"
DEFINE BAR 3 OF shortcut PROMPT "從我的最愛中移除(\<D)..." SKIP FOR showwhat2

ON SELECTION BAR 1 OF shortcut messagebox('1')
ON SELECTION BAR 3 OF shortcut messagebox('3')

*ACTIVATE POPUP shortcut

form1.rightclick()

showwhat1=.f.
showwhat2=.t.
ACTIVATE POPUP shortcut at MROW(),MCOL()

[cdbqss1]

对，同楼上的做法差不多。
如果将全局变量showwhat1,showwhat2等改为数组，并与权限控制联系起来，就更加实用。