vfp表单中设置菜单不可用 怎么操作

2025-01-02 15:02:21
推荐回答(2个)
回答1:

请参阅 set skip of

SET SKIP OF MENU MenuBarName1 lExpression1

SET SKIP OF PAD MenuTitleName OF MenuBarName2 lExpression2

SET SKIP OF POPUP MenuName1 lExpression3

SET SKIP OF BAR nMenuItemNumber | SystemItemName OF MenuName2
lExpression4

参数
MENU MenuBarName1lExpression1

允许或禁止 Visual FoxPro 系统菜单栏或由 DEFINE MENU 创建的用户自定义菜单栏。例如,Visual FoxPro 系统菜单栏 _MSYSMENU 可以通过这个命令废止: 复制代码
SET SKIP OF MENU _MSYSMENU .T.

它可以通过这个命令激活: 复制代码
SET SKIP OF MENU _MSYSMENU .F.

PAD MenuTitleNameOF MenuBarName2lExpression2

允许或禁止 Visual FoxPro 系统菜单标题或由 DEFINE PAD 创建的用户自定义菜单标题。例如,Visual FoxPro 的编辑菜单(Edit)标题可以通过这个命令废止: 复制代码
SET SKIP OF PAD _MSM_EDIT OF _MSYSMENU .T.

该菜单标题可以通过这条命令激活: 复制代码
SET SKIP OF PAD _MSM_EDIT OF _MSYSMENU .F.

POPUP MenuName1lExpression3

允许或禁止 Visual FoxPro 系统菜单或由 DEFINE POPUP 创建的用户自定义菜单。例如,Visual FoxPro 的编辑菜单(Edit)可以通过这条命令废止: 复制代码
SET SKIP OF POPUP _MEDIT .T.

该菜单可以通过这条命令激活: 复制代码
SET SKIP OF POPUP _MEDIT .F.

BAR nMenuItemNumber| SystemItemNameOF MenuName2lExpression4

允许或禁止 Visual FoxPro 系统菜单上的菜单项,或由 DEFINE BAR 创建的用户自定义菜单项。例如,Visual FoxPro 的文件菜单上的新建(New)命令可以通过这条命令废止: 复制代码
SET SKIP OF BAR _MFI_NEW OF _MFILE .T.

其中 SystemItemName 指定了菜单命令 _MFI_NEW,MenuName2 指定了菜单 _MFILE,lExpression4 指定了逻辑表达式 .T.。该菜单命令可以通过这条命令激活: 复制代码
SET SKIP OF BAR _MFI_NEW OF _MFILE .F.

使用 nMenuItemNumber 来指定由 DEFINE BAR 创建的菜单项。

回答2:

在菜单设计器窗口中有一项“选项”,点开后里面有一项“跳过”栏,在那里输入你的条件,当条件为真时,该栏跳过。