>>I have coded a program in vfp50. The menu system >>has two items and they are: >>FILE EDIT >>Is there a way to turn off one of these items? >>Example: run code and get the menu to look like.. >>EDIT > >You can have two menus and alternate them programmatically using Do menu1.mpr and Do menu2.mpr You can use Define Bar and Release bar: This is some my code: DEFINE BAR 5 OF edit PROMPT "Remove Feature" ;
SKIP FOR (!tempkeys.edit ;
.OR. EMPTY(OldVal("Function","Tempkeys") ) ;
.OR. "X" $ SUBSTR(Tempkeys.function,1,1) .OR. ;
"X" $ SUBSTR(OldVal("Function","Tempkeys"),1,1))
ON SELECTION BAR 5 OF edit DO fRemFtr IN M1MENU.MPR .... RELEASE BAR 5 OF edit
.... DEFINE BAR 5 OF edit PROMPT "Remove Key" ;
SKIP FOR (!tempkeys.edit .OR. EMPTY(OldVal("Function","Tempkeys")) ;
.OR. "NUL" $ Tempkeys.Function .OR. "NUL" $ OldVal("Function","Tempkeys") )
ON SELECTION BAR 5 OF edit DO fRemKey IN M1MENU.MPR
... RELEASE BAR 5 OF edit