blob: 6779cb57db43105a6ac447a2c75b206eb537a268 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
#!/usr/bin/env ruby
require 'tk'
require 'tkextlib/iwidgets'
pw = Tk::Iwidgets::Panedwindow.new(:width=>300, :height=>300)
top = pw.add
middle = pw.add(:margin=>10)
bottom = pw.add(:margin=>10, :minimum=>10)
pw.pack(:fill=>:both, :expand=>true)
pw.child_site_list.each{|pane|
TkButton.new(pane, :text=>pane.path, :relief=>:raised,
:borderwidth=>2).pack(:fill=>:both, :expand=>true)
}
pw.fraction(50,30,20)
pw.paneconfigure(0, :minimum=>20) # 0 == pw.index(top)
pw.paneconfigure(bottom, :margin=>15)
Tk.mainloop
|