Class Tk::RbWidget::Editable_Listbox < TkListbox

# File ext/tk/sample/editable_listbox.rb, line 123
def self.pos; @pos; end

# File ext/tk/sample/editable_listbox.rb, line 124
def self.pos=(idx); @pos = idx; end

# File ext/tk/sample/editable_listbox.rb, line 47
def configure(*args)
  ret = super

  case cget(:state)
  when 'normal'
    # do nothing
  when 'disabled'
    _ebox_erase
  else # unknown
    # do nothing

  end

  ret
end

# File ext/tk/sample/editable_listbox.rb, line 114
def create_self(keys)
  super(keys)

  unless self.listvariable
    self.listvariable = TkVariable.new(self.get(0, :end))
  end

  @ebox = TkEntry.new(self){
    @pos = nil
    def self.pos; @pos; end
    def self.pos=(idx); @pos = idx; end
  }

  _setup_ebox_bindings
  _setup_listbox_bindings
end

# File ext/tk/sample/editable_listbox.rb, line 105
def yview(*args)
  if !@ebox.pos || bbox(@ebox.pos).empty?
    @ebox.place_forget
  else
    _ebox_move(@ebox.pos)
  end
  super
end