Tk Library Source Code

Artifact d80a3f473192706186e642204a51681b0a956fb9:

Attachment "check_plotid.tcl" to ticket [40ae42af80] added by anonymous 2013-08-04 20:15:30. (unpublished)

---

package require Plotchart


canvas .c

pack .c -fill both -expand yes

bind .c <Configure> redraw

proc redraw { } {
  .c delete all
  ::Plotchart::createXYPlot .c {0 1 0.1} {0 1 0.1}
}