gtk:button-child (object)

object -- a gtk:button widget
child -- a gtk:widget child widget

Accessor of the child slot of the gtk:button class. The gtk:button-child function gets the child widget of the button. The (setf gtk:button-child) function sets the child widget.

Note that by using this API, you take full responsibility for setting up the proper accessibility label and description information for the button. Most likely, you will either set the accessibility label or description for the button explicitly, or you will set a labelled-by or described-by relations from the child widget to the button. Get the text of the label from the button:

(defvar button (gtk:button-new-with-label "Save"))
=> BUTTON
(gtk:label-label (gtk:button-child button))
=> "Save"    

Create a button with an image and a label:

(defvar button (gtk:button-new))
=> BUTTON
(defvar box (gtk:box-new :horizontal 9))
=> BOX
(gtk:box-append box (make-instance 'gtk:image :icon-name "edit-clear"))
(gtk:box-append box (make-instance 'gtk:label :label "Edit Clear"))
(setf (gtk:button-child button) box)
=> #<GTK:BOX {1003471C73}>