summaryrefslogtreecommitdiff
path: root/ruby_1_8_5/ext/tk/sample/tkextlib/iwidgets/sample/labeledwidget.rb
blob: 1d2e0a98a3626c2bef37c8c0379e4bfc3b72b026 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/env ruby
require 'tk'
require 'tkextlib/iwidgets'

lw = Tk::Iwidgets::Labeledwidget.new(:labeltext=>'Canvas Widget', 
                                     :labelpos=>:s)
lw.pack(:fill=>:both, :expand=>true, :padx=>10, :pady=>10)

cw = TkCanvas.new(lw.child_site, :relief=>:raised, :width=>200, :height=>200, 
                  :borderwidth=>3, :background=>:white)
cw.pack(:padx=>10, :pady=>10)

Tk.mainloop