1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
|
# File 'ext/lib/tkextlib/blt/component.rb', line 1714
def legend_window_create(parent=nil, keys=nil)
if parent.kind_of?(Hash)
keys = _symbolkey2str(parent)
parent = keys.delete('parent')
widgetname = keys.delete('widgetname')
keys.delete('without_creating')
elsif keys
keys = _symbolkey2str(keys)
widgetname = keys.delete('widgetname')
keys.delete('without_creating')
end
legend = self.class.new(parent, :without_creating=>true,
:widgetname=>widgetname)
class << legend
def __destroy_hook__
TkCore::INTERP.tk_windows.delete(@path)
end
end
if keys
self.legend_configure(keys.update('position'=>legend))
else
self.legend_configure('position'=>legend)
end
legend
end
|