Sophie

Sophie

distrib > Scientific%20Linux > 5x > x86_64 > media > main > by-pkgid > e2a5fef11a7f55d2dc803b8b7498c8e5 > files > 692

ruby-tcltk-1.8.5-31.el5_9.x86_64.rpm

#!/usr/bin/env ruby
require 'tk'
require 'tkextlib/iwidgets'

mainloop = Thread.new{Tk.mainloop}

TkButton.new(:text=>'QUIT', 
             :command=>proc{Tk.root.destroy}).pack(:padx=>10, :pady=>10)

Tk::Iwidgets::Selectiondialog.new.activate

mainloop.join