Команда SET SKIP OF

Делает доступным или недоступным меню, строку меню, заголовок меню или элемент меню; воздействует как на пользовательские меню, так и на системные меню Visual FoxPro.

Синтаксис

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 MenuBarName1 lExpression1

Делает доступным или недоступным системную строку меню Visual FoxPro или по ьзовательскую строку меню, созданную по команде DEFINE MENU. Например, системная строка меню Visual FoxPro с именем _MSYSMENU может быть сделана недоступной по команде:

SET SKIP OF MENU _MSYSMENU .T.

Сделать ее же доступной можно по команде

SET SKIP OF MENU _MSYSMENU .F.

PAD MenuTitleName OF MenuBarName2 lExpression2

Делает доступным или недоступным заголовок системного меню Visual FoxPro или заголовок пользовательского меню, созданный по команде DEFINE PAD. Например, заголовок системного меню Edit можно сделать недоступным по команде:

SET SKIP OF PAD _MSM_EDIT OF _MSYSMENU .T.

Тот же заголовок можно сделать доступным по команде

SET SKIP OF PAD _MSM_EDIT OF _MSYSMENU .F.

POPUP MenuName1 lExpression3

Делает доступным или недоступным системное меню Visual FoxPro или пользовате ьское меню, созданное по команде DEFINE POPUP. Например, системное меню Edit мож о сделать недоступным по команде:

SET SKIP OF POPUP _MEDIT .T.

Это же меню можно сделать доступным по команде

SET SKIP OF POPUP _MEDIT .F.

BAR nMenuItemNumber | SystemItemName OF MenuName2 lExpression4

Делает доступным или недоступным элемент системного меню Visual FoxPro или э емент пользовательского меню, созданный по команде DEFINE BAR. Например, команду New в меню File можно сделать недоступной по команде:

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.

Комментарии

Полный список внутренних имен компонентов системных меню Visual FoxPro приведе в теме Имена системных меню. Можно также воспользоваться функцией SYS(2013) для получения внутренних имен системных меню.

Если логическое выражение lExpression имеет значение "истина" (.T.), то меню, строка меню, имя меню или элемент ме ю, включенный в команду SET SKIP OF, становится недоступным, изображается блекл м шрифтом и не может быть выбран. Если lExpression имеет значение "ложь" (.F.), меню, строка меню, имя меню или элемент меню ста овится доступным и может быть выбран.