1# 2# tseparator widget 3# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) 4# 5require 'tk' 6require 'tkextlib/tile.rb' 7 8module Tk 9 module Tile 10 class TSeparator < TkWindow 11 end 12 Separator = TSeparator 13 end 14end 15 16class Tk::Tile::TSeparator < TkWindow 17 include Tk::Tile::TileWidget 18 19 if Tk::Tile::USE_TTK_NAMESPACE 20 TkCommandNames = ['::ttk::separator'.freeze].freeze 21 else 22 TkCommandNames = ['::tseparator'.freeze].freeze 23 end 24 WidgetClassName = 'TSeparator'.freeze 25 WidgetClassNames[WidgetClassName] ||= self 26 27 def self.style(*args) 28 [self::WidgetClassName, *(args.map!{|a| _get_eval_string(a)})].join('.') 29 end 30end 31 32#Tk.__set_toplevel_aliases__(:Ttk, Tk::Tile::Separator, :TkSeparator) 33Tk.__set_loaded_toplevel_aliases__('tkextlib/tile/tseparator.rb', 34 :Ttk, Tk::Tile::Separator, :TkSeparator) 35