1# 2# tkextlib/bwidget/scrollview.rb 3# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) 4# 5 6require 'tk' 7require 'tkextlib/bwidget.rb' 8 9module Tk 10 module BWidget 11 class ScrollView < TkWindow 12 end 13 end 14end 15 16class Tk::BWidget::ScrollView 17 TkCommandNames = ['ScrollView'.freeze].freeze 18 WidgetClassName = 'ScrollView'.freeze 19 WidgetClassNames[WidgetClassName] ||= self 20 21 def __strval_optkeys 22 super() << 'fill' 23 end 24 private :__strval_optkeys 25end 26