Class | Tk::TkTable::CellTag |
In: |
tk/lib/tkextlib/tktable/tktable.rb
|
Parent: | TkObject |
CellTagID_TBL | = | TkCore::INTERP.create_table |
CellTag_ID | = | ['tktbl:celltag'.freeze, '00000'.taint].freeze |
# File tk/lib/tkextlib/tktable/tktable.rb, line 125 def self.id2obj(table, id) tpath = table.path return id unless CellTagID_TBL[tpath] CellTagID_TBL[tpath][id]? CellTagID_TBL[tpath][id] : id end
# File tk/lib/tkextlib/tktable/tktable.rb, line 131 def initialize(parent, keys=nil) @parent = @t = parent @tpath - parent.path @path = @id = CellTag_ID.join(TkCore::INTERP._ip_id_) CellTagID_TBL[@tpath] = {} unless CellTagID_TBL[@tpath] CellTagID_TBL[@tpath][@id] = self CellTag_ID[1].succ! configure(keys) if keys end
# File tk/lib/tkextlib/tktable/tktable.rb, line 182 def configinfo(key=nil) @t.tag_configinfo(@id, key) end
# File tk/lib/tkextlib/tktable/tktable.rb, line 179 def configure(key, val=None) @t.tag_configure(@id, key, val) end
# File tk/lib/tkextlib/tktable/tktable.rb, line 185 def current_configinfo(key=nil) @t.current_tag_configinfo(@id, key) end
# File tk/lib/tkextlib/tktable/tktable.rb, line 145 def destroy tk_call(@tpath, 'tag', 'delete', @id) CellTagID_TBL[@tpath].delete(@id) if CellTagID_TBL[@tpath] self end
# File tk/lib/tkextlib/tktable/tktable.rb, line 172 def lower(target=None) @t.tag_lower(@id, target) end