diff options
author | lecoanet | 2003-04-16 09:43:32 +0000 |
---|---|---|
committer | lecoanet | 2003-04-16 09:43:32 +0000 |
commit | eed2656db0adae2c234c3d74af0913746ed5c444 (patch) | |
tree | f2821633165f1caf635a7e77708aeda998786c10 /demos/colorX.tcl | |
parent | c0dc6e04d97b53185eda9bbd68900eba15ae1f84 (diff) | |
download | tkzinc-eed2656db0adae2c234c3d74af0913746ed5c444.zip tkzinc-eed2656db0adae2c234c3d74af0913746ed5c444.tar.gz tkzinc-eed2656db0adae2c234c3d74af0913746ed5c444.tar.bz2 tkzinc-eed2656db0adae2c234c3d74af0913746ed5c444.tar.xz |
Many updates for the 3.2.90 release and new demos
Diffstat (limited to 'demos/colorX.tcl')
-rw-r--r-- | demos/colorX.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/demos/colorX.tcl b/demos/colorX.tcl index 87a78b8..c93ba35 100644 --- a/demos/colorX.tcl +++ b/demos/colorX.tcl @@ -17,7 +17,8 @@ button $w.buttons.dismiss -text Dismiss -command "destroy $w" button $w.buttons.code -text "See Code" -command "showCode $w" pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 -set defaultfont "-adobe-helvetica-bold-r-normal-*-120-*-*-*-*-*-*" +set defaultfont [font create -family Helvetica -size 10 -weight bold] + zinc $w.zinc -width 700 -height 600 -borderwidth 3 -relief sunken -render 1 pack $w.zinc |