diff options
Diffstat (limited to 'trunk/ext/tk/lib/tkextlib/iwidgets/spindate.rb')
-rw-r--r-- | trunk/ext/tk/lib/tkextlib/iwidgets/spindate.rb | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/trunk/ext/tk/lib/tkextlib/iwidgets/spindate.rb b/trunk/ext/tk/lib/tkextlib/iwidgets/spindate.rb new file mode 100644 index 0000000000..2c98eb4629 --- /dev/null +++ b/trunk/ext/tk/lib/tkextlib/iwidgets/spindate.rb @@ -0,0 +1,48 @@ +# +# tkextlib/iwidgets/spindate.rb +# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) +# + +require 'tk' +require 'tkextlib/iwidgets.rb' + +module Tk + module Iwidgets + class Spindate < Tk::Itk::Widget + end + end +end + +class Tk::Iwidgets::Spindate + TkCommandNames = ['::iwidgets::spindate'.freeze].freeze + WidgetClassName = 'Spindate'.freeze + WidgetClassNames[WidgetClassName] = self + + def __boolval_optkeys + super() << 'dayon' << 'monthon' << 'yearon' + end + private :__boolval_optkeys + + def __strval_optkeys + super() << 'daylabel' << 'monthformat' << 'monthlabel' << 'yearlabel' + end + private :__strval_optkeys + + def get_string + tk_call(@path, 'get', '-string') + end + alias get get_string + + def get_clicks + number(tk_call(@path, 'get', '-clicks')) + end + + def show(date=None) + tk_call(@path, 'show', date) + self + end + def show_now + tk_call(@path, 'show', 'now') + self + end +end |