Gecko [ beriskala.com ]

Name	Size	Permission	Date
after.rb	127 B	-rw-r--r--	2023-07-26 18:01
autoload.rb	22.76 KB	-rw-r--r--	2023-07-26 18:01
bgerror.rb	667 B	-rw-r--r--	2023-07-26 18:01
bindtag.rb	2.67 KB	-rw-r--r--	2023-07-26 18:01
busy.rb	2.22 KB	-rw-r--r--	2023-07-26 18:01
button.rb	769 B	-rw-r--r--	2023-07-26 18:01
canvas.rb	22.82 KB	-rw-r--r--	2023-07-26 18:01
canvastag.rb	9.19 KB	-rw-r--r--	2023-07-26 18:01
checkbutton.rb	1001 B	-rw-r--r--	2023-07-26 18:01
clipboard.rb	1.64 KB	-rw-r--r--	2023-07-26 18:01
clock.rb	1.6 KB	-rw-r--r--	2023-07-26 18:01
composite.rb	11.87 KB	-rw-r--r--	2023-07-26 18:01
console.rb	1.27 KB	-rw-r--r--	2023-07-26 18:01
dialog.rb	8.9 KB	-rw-r--r--	2023-07-26 18:01
encodedstr.rb	4.55 KB	-rw-r--r--	2023-07-26 18:01
entry.rb	2.58 KB	-rw-r--r--	2023-07-26 18:01
event.rb	17.5 KB	-rw-r--r--	2023-07-26 18:01
font.rb	60.32 KB	-rw-r--r--	2023-07-26 18:01
fontchooser.rb	3.59 KB	-rw-r--r--	2023-07-26 18:01
frame.rb	3.45 KB	-rw-r--r--	2023-07-26 18:01
grid.rb	7.69 KB	-rw-r--r--	2023-07-26 18:01
image.rb	12.54 KB	-rw-r--r--	2023-07-26 18:01
itemconfig.rb	55.14 KB	-rw-r--r--	2023-07-26 18:01
itemfont.rb	9.29 KB	-rw-r--r--	2023-07-26 18:01
kinput.rb	1.56 KB	-rw-r--r--	2023-07-26 18:01
label.rb	609 B	-rw-r--r--	2023-07-26 18:01
labelframe.rb	1014 B	-rw-r--r--	2023-07-26 18:01
listbox.rb	7.82 KB	-rw-r--r--	2023-07-26 18:01
macpkg.rb	1.91 KB	-rw-r--r--	2023-07-26 18:01
menu.rb	20.04 KB	-rw-r--r--	2023-07-26 18:01
menubar.rb	4.08 KB	-rw-r--r--	2023-07-26 18:01
menuspec.rb	13.75 KB	-rw-r--r--	2023-07-26 18:01
message.rb	693 B	-rw-r--r--	2023-07-26 18:01
mngfocus.rb	672 B	-rw-r--r--	2023-07-26 18:01
msgcat.rb	8.46 KB	-rw-r--r--	2023-07-26 18:01
namespace.rb	14.34 KB	-rw-r--r--	2023-07-26 18:01
optiondb.rb	11.28 KB	-rw-r--r--	2023-07-26 18:01
optionobj.rb	4.87 KB	-rw-r--r--	2023-07-26 18:01
pack.rb	2.51 KB	-rw-r--r--	2023-07-26 18:01
package.rb	2.8 KB	-rw-r--r--	2023-07-26 18:01
palette.rb	1.13 KB	-rw-r--r--	2023-07-26 18:01
panedwindow.rb	7.76 KB	-rw-r--r--	2023-07-26 18:01
place.rb	3.86 KB	-rw-r--r--	2023-07-26 18:01
radiobutton.rb	1.98 KB	-rw-r--r--	2023-07-26 18:01
root.rb	2.04 KB	-rw-r--r--	2023-07-26 18:01
scale.rb	2.76 KB	-rw-r--r--	2023-07-26 18:01
scrollable.rb	1.74 KB	-rw-r--r--	2023-07-26 18:01
scrollbar.rb	4.66 KB	-rw-r--r--	2023-07-26 18:01
scrollbox.rb	1.13 KB	-rw-r--r--	2023-07-26 18:01
selection.rb	2.19 KB	-rw-r--r--	2023-07-26 18:01
spinbox.rb	3.04 KB	-rw-r--r--	2023-07-26 18:01
tagfont.rb	859 B	-rw-r--r--	2023-07-26 18:01
text.rb	45.64 KB	-rw-r--r--	2023-07-26 18:01
textimage.rb	2.22 KB	-rw-r--r--	2023-07-26 18:01
textmark.rb	4.91 KB	-rw-r--r--	2023-07-26 18:01
texttag.rb	7.76 KB	-rw-r--r--	2023-07-26 18:01
textwindow.rb	4.26 KB	-rw-r--r--	2023-07-26 18:01
timer.rb	14.46 KB	-rw-r--r--	2023-07-26 18:01
tk_mac.rb	3.68 KB	-rw-r--r--	2023-07-26 18:01
toplevel.rb	6.98 KB	-rw-r--r--	2023-07-26 18:01
ttk_selector.rb	2.98 KB	-rw-r--r--	2023-07-26 18:01
txtwin_abst.rb	785 B	-rw-r--r--	2023-07-26 18:01
validation.rb	9.61 KB	-rw-r--r--	2023-07-26 18:01
variable.rb	45.88 KB	-rw-r--r--	2023-07-26 18:01
virtevent.rb	3.51 KB	-rw-r--r--	2023-07-26 18:01
winfo.rb	8.36 KB	-rw-r--r--	2023-07-26 18:01
winpkg.rb	3.87 KB	-rw-r--r--	2023-07-26 18:01
wm.rb	14.83 KB	-rw-r--r--	2023-07-26 18:01
xim.rb	2.74 KB	-rw-r--r--	2023-07-26 18:01

Rename

#
# tk/frame.rb : treat frame widget
#
require 'tk'

class Tk::Frame<TkWindow
  TkCommandNames = ['frame'.freeze].freeze
  WidgetClassName = 'Frame'.freeze
  WidgetClassNames[WidgetClassName] ||= self

################# old version
#  def initialize(parent=nil, keys=nil)
#    if keys.kind_of? Hash
#      keys = keys.dup
#      @classname = keys.delete('classname') if keys.key?('classname')
#      @colormap  = keys.delete('colormap')  if keys.key?('colormap')
#      @container = keys.delete('container') if keys.key?('container')
#      @visual    = keys.delete('visual')    if keys.key?('visual')
#    end
#    super(parent, keys)
#  end
#
#  def create_self
#    s = []
#    s << "-class"     << @classname if @classname
#    s << "-colormap"  << @colormap  if @colormap
#    s << "-container" << @container if @container
#    s << "-visual"    << @visual    if @visual
#    tk_call 'frame', @path, *s
#  end
#################

def __boolval_optkeys
    super() << 'container'
  end
  private :__boolval_optkeys

def initialize(parent=nil, keys=nil)
    my_class_name = nil
    if self.class < WidgetClassNames[self.class::WidgetClassName]
      my_class_name = self.class.name
      my_class_name = nil if my_class_name == ''
    end
    if parent.kind_of? Hash
      keys = _symbolkey2str(parent)
    else
      if keys
        keys = _symbolkey2str(keys)
        keys['parent'] = parent
      else
        keys = {'parent'=>parent}
      end
    end
    if keys.key?('classname')
       keys['class'] = keys.delete('classname')
    end
    @classname = keys['class']
    @colormap  = keys['colormap']
    @container = keys['container']
    @visual    = keys['visual']
    if !@classname && my_class_name
      keys['class'] = @classname = my_class_name
    end
    if @classname.kind_of? TkBindTag
      @db_class = @classname
      @classname = @classname.id
    elsif @classname
      @db_class = TkDatabaseClass.new(@classname)
    else
      @db_class = self.class
      @classname = @db_class::WidgetClassName
    end
    super(keys)
  end

#def create_self(keys)
  #  if keys and keys != None
  #    tk_call_without_enc('frame', @path, *hash_kv(keys))
  #  else
  #    tk_call_without_enc( 'frame', @path)
  #  end
  #end
  #private :create_self

def database_classname
    @classname
  end

def self.database_class
    if self == WidgetClassNames[WidgetClassName] || self.name == ''
      self
    else
      TkDatabaseClass.new(self.name)
    end
  end
  def self.database_classname
    self.database_class.name
  end

def self.bind(*args, &b)
    if self == WidgetClassNames[WidgetClassName] || self.name == ''
      super(*args, &b)
    else
      TkDatabaseClass.new(self.name).bind(*args, &b)
    end
  end
  def self.bind_append(*args, &b)
    if self == WidgetClassNames[WidgetClassName] || self.name == ''
      super(*args, &b)
    else
      TkDatabaseClass.new(self.name).bind_append(*args, &b)
    end
  end
  def self.bind_remove(*args)
    if self == WidgetClassNames[WidgetClassName] || self.name == ''
      super(*args)
    else
      TkDatabaseClass.new(self.name).bind_remove(*args)
    end
  end
  def self.bindinfo(*args)
    if self == WidgetClassNames[WidgetClassName] || self.name == ''
      super(*args)
    else
      TkDatabaseClass.new(self.name).bindinfo(*args)
    end
  end
end

#TkFrame = Tk::Frame unless Object.const_defined? :TkFrame
#Tk.__set_toplevel_aliases__(:Tk, Tk::Frame, :TkFrame)
Tk.__set_loaded_toplevel_aliases__('tk/frame.rb', :Tk, Tk::Frame, :TkFrame)