diff options
Diffstat (limited to 'demos/colorY.tcl')
| -rw-r--r-- | demos/colorY.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/demos/colorY.tcl b/demos/colorY.tcl index 013cedc..08f4788 100644 --- a/demos/colorY.tcl +++ b/demos/colorY.tcl @@ -5,7 +5,7 @@ if {![info exists zincDemo]} { error "This script should be run from the zinc-widget demo." } -set w .color-y +set w .colorY catch {destroy $w} toplevel $w wm title $w "Zinc Color-y Demonstration" @@ -37,6 +37,6 @@ $w.zinc add text 1 -font $defaultfont -text "A variation from 40%transparent red $w.zinc add text 1 -font $defaultfont -text "Two overlaping transparently colored rectangles on a white background" -anchor nw -position {20 320} $w.zinc add rectangle 1 {10 340 690 590} -fillcolor white -filled 1 -$w.zinc add rectangle 1 {200 350 500 580} -fillcolor {=axial 0 0|red;40|green;40 50|blue;40} -filled 1 +$w.zinc add rectangle 1 {200 350 500 580} -fillcolor {=axial 90|red;40|green;40 50|blue;40} -filled 1 $w.zinc add rectangle 1 {10 400 690 500} -fillcolor {=axial 90|yellow;40|black;40 50|cyan;40} -filled 1 |