Implementing Lotus 1-2-3-Style Menus

Lotus 1-2-3-style menus are configured so that all menus are horizontal and are displayed in one or more rows. When the user selects a field, the sub-menu replaces the parent or calling menu.

To configure a Lotus 1-2-3-style menu, all you need to do is specify the same coordinates and same size for the top-level menu and all sub-menu forms. Each sub-menu will then be displayed directly over the calling menu.

For example, the following code fragment defines three forms to be used as menus. The menus appear on the top line of the video screen in a window without a border. The first menu (menu1) is the top-level menu; menu2a and menu2b are sub-menus of the top-menu.

MFORMPTR menu1, menu2a, menu2b;

...

...

menu1 = mn_def(MNSTANDARD, 0, 0, 1, 80, LNORMAL, BDR_NULLP);

menu2a = mn_def(MNSTANDARD, 0, 0, 1, 80, LNORMAL, BDR_NULLP);

menu2b = mn_def(MNSTANDARD, 0, 0, 1, 80, LNORMAL, BDR_NULLP);

The sub-menus, when selected, will lie directly over the top-level menu. The visual effect is that the second menu replaces the first.

To complete the menu structure, menu2a and menu2b need to be installed as sub-menus within menu fields defined for the top-level menu.