# ----------------------------------------------------------------------
#  DEMO: checkbox in [incr Widgets]
# ----------------------------------------------------------------------
package require Iwidgets 4.0

iwidgets::checkbox .cb -labeltext Styles
.cb add bold -text Bold
.cb add italic -text Italic
.cb add underline -text Underline
.cb select underline

pack .cb -padx 10 -pady 10 -fill both -expand yes