diff options
Diffstat (limited to 'ruby_1_9_3/ext/tk/lib/tk/spinbox.rb')
-rw-r--r-- | ruby_1_9_3/ext/tk/lib/tk/spinbox.rb | 144 |
1 files changed, 0 insertions, 144 deletions
diff --git a/ruby_1_9_3/ext/tk/lib/tk/spinbox.rb b/ruby_1_9_3/ext/tk/lib/tk/spinbox.rb deleted file mode 100644 index f2917d60ca..0000000000 --- a/ruby_1_9_3/ext/tk/lib/tk/spinbox.rb +++ /dev/null @@ -1,144 +0,0 @@ -# -# tk/spinbox.rb - Tk spinbox classes -# by Yukihiro Matsumoto <matz@caelum.co.jp> -# -require 'tk' -require 'tk/entry' - -class Tk::Spinbox<Tk::Entry - TkCommandNames = ['spinbox'.freeze].freeze - WidgetClassName = 'Spinbox'.freeze - WidgetClassNames[WidgetClassName] ||= self - - class SpinCommand < TkValidateCommand - class ValidateArgs < TkUtil::CallbackSubst - KEY_TBL = [ - [ ?d, ?s, :direction ], - [ ?s, ?e, :current ], - [ ?W, ?w, :widget ], - nil - ] - - PROC_TBL = [ - [ ?s, TkComm.method(:string) ], - [ ?w, TkComm.method(:window) ], - - [ ?e, proc{|val| - #enc = Tk.encoding - enc = ((Tk.encoding)? Tk.encoding : Tk.encoding_system) - if enc - Tk.fromUTF8(TkComm::string(val), enc) - else - TkComm::string(val) - end - } - ], - - nil - ] - -=begin - # for Ruby m17n :: ?x --> String --> char-code ( getbyte(0) ) - KEY_TBL.map!{|inf| - if inf.kind_of?(Array) - inf[0] = inf[0].getbyte(0) if inf[0].kind_of?(String) - inf[1] = inf[1].getbyte(0) if inf[1].kind_of?(String) - end - inf - } - - PROC_TBL.map!{|inf| - if inf.kind_of?(Array) - inf[0] = inf[0].getbyte(0) if inf[0].kind_of?(String) - end - inf - } -=end - - _setup_subst_table(KEY_TBL, PROC_TBL); - - def self.ret_val(val) - (val)? '1': '0' - end - end - - def self._config_keys - ['command'] - end - end - - def __validation_class_list - super() << SpinCommand - end - - Tk::ValidateConfigure.__def_validcmd(binding, SpinCommand) - - #def create_self(keys) - # tk_call_without_enc('spinbox', @path) - # if keys and keys != None - # configure(keys) - # end - #end - #private :create_self - - def __boolval_optkeys - super() << 'wrap' - end - private :__boolval_optkeys - - def __strval_optkeys - super() << 'buttonbackground' << 'format' - end - private :__strval_optkeys - - def __listval_optkeys - super() << 'values' - end - private :__listval_optkeys - - def identify(x, y) - tk_send_without_enc('identify', x, y) - end - - def invoke(elem) - tk_send_without_enc('invoke', elem) - self - end - - def spinup - begin - tk_send_without_enc('invoke', 'buttonup') - rescue RuntimeError => e - # old version of element? - begin - tk_send_without_enc('invoke', 'spinup') - rescue - fail e - end - end - self - end - - def spindown - begin - tk_send_without_enc('invoke', 'buttondown') - rescue RuntimeError => e - # old version of element? - begin - tk_send_without_enc('invoke', 'spinup') - rescue - fail e - end - end - self - end - - def set(str) - _fromUTF8(tk_send_without_enc('set', _get_eval_enc_str(str))) - end -end - -#TkSpinbox = Tk::Spinbox unless Object.const_defined? :TkSpinbox -#Tk.__set_toplevel_aliases__(:Tk, Tk::Spinbox, :TkSpinbox) -Tk.__set_loaded_toplevel_aliases__('tk/spinbox.rb', :Tk, Tk::Spinbox, - :TkSpinbox) |