Восстанавливает заданное определение меню, которое было занесено в стек командой PUSH POPUP.

POP POPUP MenuName

Параметры

MenuName

Задает имя меню, определение которого извлекается из стека. Это может быть пользовательское меню, созданное с помощью команды DEFINE MENU, или системное меню Visual FoxPro.

Примечание

Команда POP POPUP при мспользовании совместно с PUSH POPUP дает возможность сохранить определение меню, внести изменения в определение меню, а затем восстановить определение меню в первоначальное состояние.

Определения меню заносятся в стек и извлекаются из него по схеме "последний вошел, первый вышел".

Определения меню занимают память, так каждый POP POPUP должно иметь PUSH POPUP чтобы занимаемая приложением память использовалась оптимавльно.

Пример

В приведенном примере, создается меню с именем popExam. Меню помещается в стек и один пункт меню модифицируется. Затем оригинальное меню востанавливается из стека.

  Copy Code
DEFINE POPUP popExam FROM 5,5
DEFINE BAR 1 OF popExam PROMPT 'One'
DEFINE BAR 2 OF popExam PROMPT 'Two'
DEFINE BAR 3 OF popExam PROMPT 'Three'
DEFINE BAR 4 OF popExam PROMPT 'Four'
ACTIVATE POPUP popExam NOWAIT

PUSH POPUP popExam 
WAIT 'Popup pushed' WINDOW
RELEASE BAR 2 OF popExam
WAIT 'This is the modified popup' WINDOW

POP POPUP popExam 
WAIT 'Popup popped, original popup restored' WINDOW
DEACTIVATE POPUP popExam
RELEASE POPUP popExam

Смотреть также