FreeMenu()
Syntaxe
FreeMenu(#Menu)Description
Supprime un menu et libère toutes ses ressources.
Arguments
#Menu Le menu à supprimer.
Si #PB_All est spécifié, tous les autres menus sont libérés.
Valeur de retour
Aucune.
Remarques
Tous les menus restants sont automatiquement supprimés quand le programme se termine.
Exemple
If OpenWindow(0, 200, 200, 300, 100, "Exemple FreeMenu") ButtonGadget(0,50,10,190,30,"Supprime le Menu") If CreateMenu(0, WindowID(0)) MenuTitle("Projet") MenuItem(1, "Ouvrir") EndIf Repeat Event = WaitWindowEvent() If Event = #PB_Event_Gadget Select EventGadget() Case 0 If IsMenu(0) ; Le menu existe-t-il ? FreeMenu(0) ; Si oui alors on le supprime EndIf EndSelect EndIf Until Event = #PB_Event_CloseWindow EndIf
Voir aussi
CreateMenu(), CreateImageMenu(), CreatePopupMenu(), CreatePopupImageMenu()
OS Supportés
Tous