1#!/usr/bin/env ruby
2require 'tk'
3require 'tkextlib/iwidgets'
4
5#
6# Non-editable Dropdown Combobox
7#
8cb1 = Tk::Iwidgets::Combobox.new(:labeltext=>'Month:',
9                                 :selectioncommand=>proc{
10                                   puts(cb1.get_curselection)
11                                 },
12                                 :editable=>false, :listheight=>185,
13                                 :popupcursor=>'hand1')
14
15cb1.insert_list('end', *%w(Jan Feb Mar Apr May June Jul Aug Sept Oct Nov Dec))
16
17
18#
19# Editable Dropdown Combobox
20#
21cb2 = Tk::Iwidgets::Combobox.new(:labeltext=>'Operating System:',
22                                 :selectioncommand=>proc{
23                                   puts(cb2.get_curselection)
24                                 })
25
26cb2.insert_list('end', *%w(Linux HP-UX SunOS Solaris Irix))
27cb2.insert_entry('end', 'L')
28
29cb1.pack(:padx=>10, :pady=>10, :fill=>:x)
30cb2.pack(:padx=>10, :pady=>10, :fill=>:x)
31
32Tk.mainloop
33