LispWorks CAPI/Créer des menus/Désactivation des éléments de menu

LispWorks CAPI
LispWorks CAPI
Sommaire
Accueil Liste de nouveautés Préface 1. Introduction au CAPI 2. Pour débuter 3. Considérations générales 4. Créer une fenêtre simple 5. Créer des fenêtres avec des choix 6. Aménagement des panneaux du CAPI 7. Modifier la fenêtre CAPI 8. Créer des menus 9. Définir une classe d'interface 10. Incitation à l'entrée 11. Créer sa propre fenêtre 12. Ports graphiques 13. Couleur du système 14. Imprimer à partir du CAPI
Modifier ce modèle

Une fonction peut être utilisé par l'initarg :enabled-function pour déterminer si un menu, un élément de menu est actif. Par défaut cet objet est toujours actif.

Considérez l'exemple suivant

(defvar *on* nil)

(contain
 (make-instance 'menu
                :items
                (list 
                 (make-instance 
                 'menu-item
                 :title "Foo"
                 :enabled-function 
                 #'(lambda (menu) *on*))
                (make-instance 
                 'menu-item
                 :title "Bar"))))

En changeant la valeur de *on* de t à nil dans le Listener (en utilisant setq), donne comme résultat le changement de l'état actif à non-actif.

• 8.7.1 Dialogues et désactiver les éléments de menu