diff options
| author | lecoanet | 2004-05-07 15:31:01 +0000 |
|---|---|---|
| committer | lecoanet | 2004-05-07 15:31:01 +0000 |
| commit | 9f0d489e9cda59a8ed026be96fa56f9ecc1a33f7 (patch) | |
| tree | 842972357fdc905c7353dacf88a10e78427b96d8 /demos/contours.tcl | |
| parent | 752ff8735f731e8d37fb1bea60b0323af1a1ec06 (diff) | |
| download | tkzinc-9f0d489e9cda59a8ed026be96fa56f9ecc1a33f7.zip tkzinc-9f0d489e9cda59a8ed026be96fa56f9ecc1a33f7.tar.gz tkzinc-9f0d489e9cda59a8ed026be96fa56f9ecc1a33f7.tar.bz2 tkzinc-9f0d489e9cda59a8ed026be96fa56f9ecc1a33f7.tar.xz | |
Switched from pack to grid; Demos are put in a namespace; No more name aliases for fonts
Diffstat (limited to 'demos/contours.tcl')
| -rw-r--r-- | demos/contours.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/demos/contours.tcl b/demos/contours.tcl index a3f941a..4f08fca 100644 --- a/demos/contours.tcl +++ b/demos/contours.tcl @@ -11,7 +11,7 @@ namespace eval contoursDemo { toplevel $w wm title $w "Zinc Curve contours Demonstration" wm iconname $w Curve - + grid [button $w.dismiss -text Dismiss -command "destroy $w"] -row 2 -column 0 -pady 10 grid [button $w.code -text "See Code" -command "showCode $w"] -row 2 -column 1 -pady 10 @@ -30,7 +30,7 @@ The following operations are possible: modifying the grey curve contour." # Creating the zinc widget - grid [zinc $w.zinc -width 600 -height 500 -font 10x20 -borderwidth 3 \ + grid [zinc $w.zinc -width 600 -height 500 -borderwidth 3 \ -relief sunken] -row 1 -column 0 -columnspan 2 -sticky news grid columnconfigure $w 0 -weight 1 grid columnconfigure $w 1 -weight 1 |