Information générale
Catégorie:
Gestionnaire d'écran & Écrans
This works, except I was hoping to have the menu disappear/reappear when I clicked on other forms. The only way I could get it to work was:
*Activate
IF !THISFORM.MenuActive
PUSH MENU _msysmenu
DO menu1.mpr
THISFORM.MenuActive = .T.
ENDIF
*Deactivate/Destroy
IF THISFORM.MenuActive
POP MENU _msysmenu
THISFORM.MenuActive = .F.
ENDIF
This seems to work, but I feel like I'm doing things wrong, since I'm having to run the menu many times. Also, the deactivate events don't fire 1:1 with the activate events, so I have that form prop (MenuActive) to keep things sync'd.
Bob
>Bob,
>I don't play with menus much but I think it should be something like :
>*Init
>Push menu _msysmenu && or menuname
>do newmenu.mpr
>*destroy
>pop menu _msysmenu
>Cetin
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement