1#!/usr/bin/env ruby
2#########################################################
3#
4#  use Tk::UTF8_String() for a utf8 charecter
5#
6#########################################################
7require 'tk'
8require 'tkextlib/iwidgets'
9
10TkOption.add('*textBackground', 'white')
11
12ef  = Tk::Iwidgets::Entryfield.new(:command=>proc{puts "Return Pressed"})
13
14fef = Tk::Iwidgets::Entryfield.new(:labeltext=>'Fixed:',
15                                   :fixed=>10, :width=>12)
16
17nef = Tk::Iwidgets::Entryfield.new(:labeltext=>'Numeric:',
18                                   :validate=>:numeric, :width=>12)
19
20aef = Tk::Iwidgets::Entryfield.new(:labeltext=>'Alphabetic:',
21                                   :validate=>:alphabetic, :width=>12,
22                                   :invalid=>proc{
23                                     puts "Alphabetic contents invalid"
24                                   })
25
26pef = Tk::Iwidgets::Entryfield.new(:labeltext=>'Password:', :width=>12,
27                                   :show=>Tk::UTF8_String("\267"),
28                                                         ## <=== utf8 character
29                                   :command=>proc{puts "Return Pressed"})
30
31Tk::Iwidgets::Labeledwidget.alignlabels(ef, fef, nef, aef, pef)
32
33ef.pack(:fil=>:x,  :expand=>true, :padx=>10, :pady=>5)
34fef.pack(:fil=>:x,  :expand=>true, :padx=>10, :pady=>5)
35nef.pack(:fil=>:x,  :expand=>true, :padx=>10, :pady=>5)
36aef.pack(:fil=>:x,  :expand=>true, :padx=>10, :pady=>5)
37pef.pack(:fil=>:x,  :expand=>true, :padx=>10, :pady=>5)
38
39Tk.mainloop
40