1  #
   2  # tk/labelframe.rb : treat labelframe widget
   3  #
   4  require 'tk'
   5  require 'tk/frame'
   6 
   7  class Tk::LabelFrame<Tk::Frame
   8    TkCommandNames = ['labelframe'.freeze].freeze
   9    WidgetClassName = 'Labelframe'.freeze
  10    WidgetClassNames[WidgetClassName] = self
  11    #def create_self(keys)
  12    #  if keys and keys != None
  13    #    tk_call_without_enc('labelframe', @path, *hash_kv(keys, true))
  14    #  else
  15    #    tk_call_without_enc('labelframe', @path)
  16    #  end
  17    #end
  18    #private :create_self
  19 
  20    def __val2ruby_optkeys  # { key=>proc, ... }
  21      super().update('labelwidget'=>proc{|v| window(v)})
  22    end
  23    private :__val2ruby_optkeys
  24  end
  25 
  26  Tk::Labelframe = Tk::LabelFrame
  27  #TkLabelFrame = Tk::LabelFrame unless Object.const_defined? :TkLabelFrame
  28  #TkLabelframe = Tk::Labelframe unless Object.const_defined? :TkLabelframe
  29  Tk.__set_toplevel_aliases__(:Tk, Tk::LabelFrame, :TkLabelFrame, :TkLabelframe)