require 'rubygems'
require 'btk'
include Gtk
# the hash option will call set_[key](...) except :pack
# w.set_default_size(640,400)
# w.set_window_position(Window::POS_CENTER)
Btk.Window :default_size=>[640,400],:window_position=>Window::POS_CENTER do|w|
w.sig_destroy do
Gtk.main_quit
end
w.VBox do|vbox|
#equal
#sw.set_policy(POLICY_AUTOMATIC,POLICY_AUTOMATIC)
#vbox.pack_start(sw)
vbox.ScrolledWindow :policy=>[POLICY_AUTOMATIC,POLICY_AUTOMATIC] do|sw|
sw.TextView
end
# :pack=>false will make vbox call vbox.pack_start(hbox,false)
vbox.HBox :pack=>false do|hbox|
hbox.Button "OK",:pack=>false
hbox.Button "QUIT",:pack=>false do|btn|
btn.sig_clicked do
w.destroy
end
end
end
end
w.show_all
end
Gtk.main