Page 325	Table of Contents	Index	Page 327
	Chapters
	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 A, B, C, D, E

CHAPTER 30. GADGETS

When this function returns nil, that indicates that there is no value activate callback for the
gadget.

=> activate-callback action-gadget client gadget-id [Callback Generic Function]
This callback is invoked when the gadget is activated.

The default method (on action-gadget) calls the function stored in gadget-activate-callbackwith one argument, the gadget.

CLIM implementations must implement or inherit a method for activate-callback for every
gadget that is a subclass of action-gadget.

=> oriented-gadget [Class]
The class that is mixed in to a gadget that has an orientation associated with it, for example, a
slider.

=> :orientation [Init Arg]
All subclasses of oriented-gadget must handle this initarg, which is used to specify the orien-
tation of the gadget.

=> gadget-orientation oriented-gadget [Generic Function]
Returns the orientation of the gadget oriented-gadget. Typically, this will be a keyword such as
:horizontal or :vertical.

=> labelled-gadget [Class]
The class that is mixed in to a gadget that has a label, for example, a push button.

=> :label [Init Arg]
=> :align-x [Init Arg]
=> :align-y [Init Arg]
=> :label-text-style [Init Arg]
All subclasses of labelled-gadget must handle these initargs, which are used to specify the
label, its x and y alignment, and its text style for the gadget.

=> gadget-label labelled-gadget [Generic Function]
=> (setf gadget-label) label labelled-gadget [Generic Function]
Returns (or sets) the label of the gadget labelled-gadget. The label must be a string. Changing
the label of a gadget may result in invoking the layout protocol on the gadget and its ancestor
sheets.

=> gadget-label-align-x labelled-gadget [Generic Function]
=> (setf gadget-label-align-x) alignment labelled-gadget [Generic Function]
=> gadget-label-align-y labelled-gadget [Generic Function]
=> (setf gadget-label-align-y) alignment labelled-gadget [Generic Function]

Page 325	Table of Contents	Index	Page 327
	Chapters
	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 A, B, C, D, E