diff options
author | das <das> | 2007-11-04 10:38:09 (GMT) |
---|---|---|
committer | das <das> | 2007-11-04 10:38:09 (GMT) |
commit | 9ad15b7decd323c998eec03344e91819c4e8512a (patch) | |
tree | 9e4a794f8796ede303e31b6a30bb661622493c63 /library/demos/mclist.tcl | |
parent | 9107a42cf16f413e8244ec0241f69a2d1b21bdae (diff) | |
download | tk-9ad15b7decd323c998eec03344e91819c4e8512a.zip tk-9ad15b7decd323c998eec03344e91819c4e8512a.tar.gz tk-9ad15b7decd323c998eec03344e91819c4e8512a.tar.bz2 |
* library/demos/mclist.tcl: Aqua GOOBE.
* library/demos/tree.tcl:
* library/demos/ttknote.tcl:
* library/demos/widget:
Diffstat (limited to 'library/demos/mclist.tcl')
-rw-r--r-- | library/demos/mclist.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/demos/mclist.tcl b/library/demos/mclist.tcl index ed2f55a..6562117 100644 --- a/library/demos/mclist.tcl +++ b/library/demos/mclist.tcl @@ -3,7 +3,7 @@ # This demonstration script creates a toplevel window containing a Ttk # tree widget configured as a multi-column listbox. # -# RCS: @(#) $Id: mclist.tcl,v 1.1 2007/11/02 23:48:11 dkf Exp $ +# RCS: @(#) $Id: mclist.tcl,v 1.2 2007/11/04 10:38:09 das Exp $ if {![info exists widgetDemo]} { error "This script should be run from the \"widget\" demo." @@ -20,7 +20,7 @@ wm iconname $w "mclist" positionWindow $w ## Explanatory text -ttk::label $w.msg -font $font -wraplength 4i -justify left -anchor n -text "Ttk is the new Tk themed widget set. One of the widgets it includes is a tree widget, which can be configured to display multiple columns of informational data without displaying the tree itself. This is a simple way to build a listbox that has multiple columns. Clicking on the heading for a column will sort the data by that column. You can also change the width of the columns by dragging the boundary between them." +ttk::label $w.msg -font $font -wraplength 4i -justify left -anchor n -padding {10 2 10 6} -text "Ttk is the new Tk themed widget set. One of the widgets it includes is a tree widget, which can be configured to display multiple columns of informational data without displaying the tree itself. This is a simple way to build a listbox that has multiple columns. Clicking on the heading for a column will sort the data by that column. You can also change the width of the columns by dragging the boundary between them." pack $w.msg -fill x ## See Code / Dismiss |