push menu 命令示例

在下面示例中,将 visual foxpro 系统菜单栏压进堆栈并修改此菜单栏,然后还原初始的系统菜单栏。 


wait window 'press a key to push the system menu bar'
push menu _msysmenu
wait window 'press a key to change the system menu bar'
set sysmenu to _mfile, _medit
wait window 'press a key to restore the system menu bar'
pop menu _msysmenu