The macro define-menu
defines a function called function-name with a single argument self that will make a menu. The parameters title , menu-body and menu-options take the same form as the :menus
section of define-interface
.
(capi:define-menu make-test-menu (self)
"Test"
("Item1"
"Item2"
"Item3"
(:component
("Item4"
"Item5")
:interaction :single-selection)))
(setq interface (make-instance 'capi:interface))
(setf (capi:interface-menu-bar-items interface)
(list (make-test-menu interface)))
(capi:display interface)