# File tk/lib/tkextlib/tile/treeview.rb, line 833
def self.id2obj(tree, id)
tpath = tree.path
return id unless Tk::Tile::Treeview::Tag::TagID_TBL[tpath]
(Tk::Tile::Treeview::Tag::TagID_TBL[tpath][id])? \
Tk::Tile::Treeview::Tag::TagID_TBL[tpath][id]: id
end
# File tk/lib/tkextlib/tile/treeview.rb, line 840
def initialize(tree, keys=nil)
@parent = @t = tree
@tpath = tree.path
@path = @id = Tag_ID.join(TkCore::INTERP._ip_id_)
TagID_TBL[@tpath] = {} unless TagID_TBL[@tpath]
TagID_TBL[@tpath][@id] = self
Tag_ID[1].succ!
if keys && keys != None
tk_call_without_enc(@tpath, 'tag', 'configure', *hash_kv(keys, true))
end
end
# File tk/lib/tkextlib/tile/treeview.rb, line 855
def bind(seq, *args)
if TkComm._callback_entry?(args[0]) || !block_given?
cmd = args.shift
else
cmd = Proc.new
end
@t.tag_bind(@id, seq, cmd, *args)
self
end
# File tk/lib/tkextlib/tile/treeview.rb, line 865
def bind_append(seq, *args)
if TkComm._callback_entry?(args[0]) || !block_given?
cmd = args.shift
else
cmd = Proc.new
end
@t.tag_bind_append(@id, seq, cmd, *args)
self
end
# File tk/lib/tkextlib/tile/treeview.rb, line 875
def bind_remove(seq)
@t.tag_bind_remove(@id, seq)
self
end
# File tk/lib/tkextlib/tile/treeview.rb, line 880
def bindinfo(seq=nil)
@t.tag_bindinfo(@id, seq)
end
# File tk/lib/tkextlib/tile/treeview.rb, line 884
def cget(option)
@t.tagcget(@id, option)
end
# File tk/lib/tkextlib/tile/treeview.rb, line 893
def configinfo(key=nil)
@t.tagconfiginfo(@id, key)
end
# File tk/lib/tkextlib/tile/treeview.rb, line 888
def configure(key, value=None)
@t.tagconfigure(@id, key, value)
self
end