The class menu-component
is a choice that is used to group menu items and submenus both visually and functionally. The items contained by the menu-component
appear separated from other items, menus, or menu components, by separators.
The items to appear in the menu.
A setup callback function to dynamically compute the items.
A setup callback function to dynamically compute the selection.
A setup callback function to dynamically compute the selected item.
A setup callback function to dynamically compute the selected items.
Because menu-component
is a choice, the component can have
interaction
:no-selection
, :single-selection
or :multiple-selection
(extended selection does not apply here). This is represented visually in the menu as appropriate to the window system that the CAPI is running on (by ticks in Microsoft Windows, and by radio buttons and check buttons in Motif).
Note that it is not appropriate to have menu components or submenus inside :single-selection
and :multiple-selection
components, but it is OK in :no-selection
components.
items and items-function behave as in menu.
No more than one of
selection-function
,
selected-item-function
and
selected-items-function
should be non-nil. Each defaults to nil
. If one of these setup callbacks is supplied, it should be a function which is called before the menu-component
is displayed and which determines which items are selected. By default the setup callback is called on the interface of the menu-component
, but this argument can be changed by passing the menu-object initarg
setup-callback-argument
.
selection-function
, if non-nil, should return a value which is suitable for passing to the choice accessor (setf choice-selection)
. This will be nil
, or a single index (for
interaction
:single-selection
), or a list of item indices (for
interaction
:multiple-selection
and :extended-selection
).
selected-item-function
, if non-nil, should return an object which is an item in the menu-component
, or is equal to such an item when compared by the menu-component
's
test-function
.
selected-items-function , if non-nil, should return a list of such objects.
(capi:contain (make-instance
'capi:menu-component
:items '(:red :green :blue)
:print-function 'string-capitalize
:interaction :single-selection))
(capi:contain (make-instance
'capi:menu-component
:items '(:red :green :blue)
:print-function 'string-capitalize
:interaction :multiple-selection))
(capi:contain (make-instance
'capi:menu
:items (list
"An Item"
(make-instance
'capi:menu-component
:items '(:red :green :blue)
:print-function
'string-capitalize
:interaction :no-selection)
"Another Item")))
CAPI User Guide and Reference Manual (Windows version) - 3 Aug 2017