blob: 1fd7a5bc05e98270149241847a34f14f6c7f9276 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
#!/usr/bin/env ruby
require 'tk'
require 'tkextlib/iwidgets'
om = Tk::Iwidgets::Optionmenu.new(:labelmargin=>5, :labelpos=>:w,
:labeltext=>"Operating System :")
om.insert('end', 'Unix', 'VMS', 'Linux', 'OS/2', 'Windows NT', 'DOS')
om.sort_ascending
om.select('Linux')
om.pack(:padx=>10, :pady=>10)
Tk.mainloop
|