Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Enumerate menu
Message
De
13/04/2004 15:06:51
Dave Nantais
Light speed database solutions
Ontario, Canada
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de menu & Menus
Titre:
Divers
Thread ID:
00894515
Message ID:
00894557
Vues:
13
>How can I get a list of all the menu bars for each menu pad on the active menu? I can find the pads, but not the menuitems defined for each pad.


If you want to cycle through all of the menu pad names on the VFP system window use this code snippet :


FOR lni = 1 TO CNTBAR("_msysmenu")

laMenuName[lni] = GETPAD("_msysmenu",8)

ENDFOR

This gives you the internal names of each Menu Pad.

Then you can use the contents produced by SYS(2013)
to get the specific internal menu item names for the system menu.

Finally, you can take the information from laMenuItem[lni] and SYS(2013) and use the PRMBAR command to get the text of each menu item name.

What an annoying convoluted mess.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform