How to Return to a Menu's Submenu After a Selection

• Microsoft FoxPro for Windows, versions 2.5, 2.5a, 2.5b, 2.6, 2.6a
• Microsoft FoxPro for MS-DOS, versions 2.5, 2.5a, 2.5b, 2.6, 2.6a
• Microsoft FoxPro for Macintosh, versions 2.5, 2.5a, 2.5b, 2.6, 2.6a

SUMMARY

When a user makes a selection from a menu, the menu disappears and then the selection is executed. Some programmers want to have their users returned to the selected menu and submenu with the last choice highlighted. This article gives the steps you need to follow for every menu option you want to return to.

NOTE: If a menu is disabled at the time the ACTIVATE POPUP command is issued, it will not activate the last menu. This can occur when you create a Quick Menu and use the default menus supplied by FoxPro. FoxPro will automatically enable and disable menus depending on the current status and environment in FoxPro. For example, the Record menu is enabled only when a database file is open. Clicking an option on this menu runs a procedure that closes the database file in the current work area, the Record menu becomes disabled and the ACTIVATE POPUP command will not be able to redisplay the Record submenu.

MORE INFORMATION

Step-by-Step Procedure

1. Create a quick menu.

2. Insert a new menu option on the Edit menu, and set the Result to the Procedure option.

3. In the procedure, enter these statements:

   PRIVATE lcLastPopup, lnLastBar

   lcLastPopup = POPUP()

      lnLastBar   = BAR()
   
      * place your statement(s) here that
      * will be executed for your menu option
   
      ACTIVATE POPUP &lcLastPopUp BAR lnLastBar
   
   

4. Save the menu, and generate the menu code.

5. When you run the menu, the selected option will run, but when it is completed, the menu and submenu will reappear, and the last option selected will be highlighted.