diff options
Diffstat (limited to 'itcl/iwidgets/demos/selectionbox')
| -rw-r--r-- | itcl/iwidgets/demos/selectionbox | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/itcl/iwidgets/demos/selectionbox b/itcl/iwidgets/demos/selectionbox new file mode 100644 index 00000000000..2957b910ddc --- /dev/null +++ b/itcl/iwidgets/demos/selectionbox @@ -0,0 +1,12 @@ +# ---------------------------------------------------------------------- +# DEMO: selectionbox in [incr Widgets] +# ---------------------------------------------------------------------- +package require Iwidgets 4.0 + +option add *textBackground seashell + +iwidgets::selectionbox .sb -selectionlabel "Font:" -height 2i +pack .sb + +.sb insert items end Ariel Courier Helvetica Knarly Lucida \ + Rumpus Symbol Times "Zapf Dingbats" |