diff options
Diffstat (limited to 'itcl/iwidgets/demos/scrolledhtml')
| -rw-r--r-- | itcl/iwidgets/demos/scrolledhtml | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/itcl/iwidgets/demos/scrolledhtml b/itcl/iwidgets/demos/scrolledhtml new file mode 100644 index 00000000000..b7e06cce35c --- /dev/null +++ b/itcl/iwidgets/demos/scrolledhtml @@ -0,0 +1,14 @@ +# ---------------------------------------------------------------------- +# DEMO: scrolledhtml in [incr Widgets] +# ---------------------------------------------------------------------- +package require Iwidgets 4.0 + +option add *textBackground seashell + +iwidgets::scrolledhtml .sh -labeltext "Scrolledhtml" \ + -width 5i -height 3i \ + -wrap word -linkcommand ".sh import -link" -padx 10 + +pack .sh + +.sh import [file join ${iwidgets::library} demos demo.html] |