diff options
Diffstat (limited to 'demos/curveBezier.tcl')
-rw-r--r-- | demos/curveBezier.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/demos/curveBezier.tcl b/demos/curveBezier.tcl index 8531ce0..2cc0a6d 100644 --- a/demos/curveBezier.tcl +++ b/demos/curveBezier.tcl @@ -13,8 +13,8 @@ wm title $w "Zinc Curve Bezier Demonstration" wm iconname $w Curve set defaultfont [font create -family Helvetica -size 10 -weight bold] -set imagePath [file join $zinc_library demos images] -set texture [image create photo -file [file join $imagePath paper-grey1.gif]] +#set imagePath [file join $zinc_library demos images] +#set texture [image create photo -file [file join $imagePath paper-grey1.gif]] set splineColor \#AA0000 set handleColor grey70 set barColor grey30 @@ -36,7 +36,8 @@ $w.text insert 0.0 { You can move the handles to modify the bezier curves } -zinc $w.zinc -width 700 -height 650 -font 9x15 -borderwidth 0 -tile $texture +#zinc $w.zinc -width 700 -height 650 -font 9x15 -borderwidth 0 -tile $texture +zinc $w.zinc -width 700 -height 650 -font 9x15 -borderwidth 0 -backcolor #898A8F pack $w.zinc |