PATH:
usr
/
share
/
tk8.5
/
demos
#!/bin/sh # the next line restarts using wish \ exec wish8.5 "$0" ${1+"$@"} # hello -- # Simple Tk script to create a button that prints "Hello, world". # Click on the button to terminate the program. package require Tk # The first line below creates the button, and the second line # asks the packer to shrink-wrap the application's main window # around the button. button .hello -text "Hello, world" -command { puts stdout "Hello, world"; destroy . } pack .hello # Local Variables: # mode: tcl # End:
[-] tree.tcl
[edit]
[-] toolbar.tcl
[edit]
[-] textpeer.tcl
[edit]
[-] spin.tcl
[edit]
[-] label.tcl
[edit]
[-] ctext.tcl
[edit]
[-] paned1.tcl
[edit]
[-] button.tcl
[edit]
[-] radio.tcl
[edit]
[-] sayings.tcl
[edit]
[+]
..
[-] timer
[edit]
[-] ttkbut.tcl
[edit]
[-] states.tcl
[edit]
[-] README
[edit]
[-] ttknote.tcl
[edit]
[-] puzzle.tcl
[edit]
[-] bind.tcl
[edit]
[-] combo.tcl
[edit]
[-] check.tcl
[edit]
[-] paned2.tcl
[edit]
[-] bitmap.tcl
[edit]
[-] browse
[edit]
[-] license.terms
[edit]
[-] ttkscale.tcl
[edit]
[-] plot.tcl
[edit]
[-] rmt
[edit]
[-] tcolor
[edit]
[-] tclIndex
[edit]
[-] ttkprogress.tcl
[edit]
[-] arrow.tcl
[edit]
[-] aniwave.tcl
[edit]
[-] widget
[edit]
[-] items.tcl
[edit]
[-] style.tcl
[edit]
[-] colors.tcl
[edit]
[-] twind.tcl
[edit]
[-] text.tcl
[edit]
[-] labelframe.tcl
[edit]
[-] entry1.tcl
[edit]
[-] hello
[edit]
[-] filebox.tcl
[edit]
[-] knightstour.tcl
[edit]
[-] dialog2.tcl
[edit]
[-] ruler.tcl
[edit]
[-] form.tcl
[edit]
[-] dialog1.tcl
[edit]
[-] msgbox.tcl
[edit]
[-] ttkpane.tcl
[edit]
[-] image2.tcl
[edit]
[-] floor.tcl
[edit]
[-] mclist.tcl
[edit]
[-] menu.tcl
[edit]
[-] ixset
[edit]
[-] entry2.tcl
[edit]
[-] rolodex
[edit]
[+]
images
[-] goldberg.tcl
[edit]
[-] unicodeout.tcl
[edit]
[-] vscale.tcl
[edit]
[-] nl.msg
[edit]
[-] search.tcl
[edit]
[-] icon.tcl
[edit]
[-] menubu.tcl
[edit]
[-] ttkmenu.tcl
[edit]
[-] en.msg
[edit]
[-] anilabel.tcl
[edit]
[-] entry3.tcl
[edit]
[-] cscroll.tcl
[edit]
[-] image1.tcl
[edit]
[-] clrpick.tcl
[edit]
[-] pendulum.tcl
[edit]
[-] hscale.tcl
[edit]