3.5.2 Check buttons

Check buttons can be produced with the check-button element.

1. Type the following in a Listener:

(setq check (make-instance 'check-button 

                       :selection-callback 'hello

                       :retract-callback 'test-callback

                       :text "Button"))

(contain check)

Figure 3.6 A check button

Notice the use of :retract-callback in the example above, to specify a callback when the element is deselected.

Like push buttons, check buttons can be disabled by specifying :enabled nil .