A "Hello Világ" példaprogram

wm title . "Hello"
wm iconname . "hello"

button .hello -text "Hello, vilag!" -command {
  puts stdout "Hello, vilag!"; 
  destroy .
}

pack .hello -expand yes -fill both

Gif kép ábrázolása

wm title . "GIF Abrazolas"
wm iconname . "GIF"

frame .gombok -borderwidth 5 -relief raised 
pack .gombok -side bottom -expand yes -fill x -padx 5 -pady 5
button .gombok.ok -text "OK" -command "exit"
pack .gombok.ok -side left -expand yes

catch {image delete kep}
image create photo kep -file "earth.gif"
label .cimke -image kep -borderwidth 5 -relief raised

pack .cimke -side top -padx 5 -pady 5