From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001 From: Jari Vetoniemi Date: Mon, 16 Mar 2020 18:49:26 +0900 Subject: Fresh start --- .../ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb | 48 ++++++++++++++++++++++ 1 file changed, 48 insertions(+) create mode 100644 jni/ruby/ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb (limited to 'jni/ruby/ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb') diff --git a/jni/ruby/ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb b/jni/ruby/ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb new file mode 100644 index 0000000..ea5a18c --- /dev/null +++ b/jni/ruby/ext/tk/lib/tkextlib/bwidget/scrolledwindow.rb @@ -0,0 +1,48 @@ +# +# tkextlib/bwidget/scrolledwindow.rb +# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp) +# + +require 'tk' +require 'tk/frame' +require 'tkextlib/bwidget.rb' + +module Tk + module BWidget + class ScrolledWindow < TkWindow + end + end +end + +class Tk::BWidget::ScrolledWindow + TkCommandNames = ['ScrolledWindow'.freeze].freeze + WidgetClassName = 'ScrolledWindow'.freeze + WidgetClassNames[WidgetClassName] ||= self + + def __strval_optkeys + super() << 'sides' + end + private :__strval_optkeys + + def __boolval_optkeys + super() << 'managed' + end + private :__boolval_optkeys + + def get_frame(&b) + win = window(tk_send_without_enc('getframe')) + if b + if TkCore::WITH_RUBY_VM ### Ruby 1.9 !!!! + win.instance_exec(self, &b) + else + win.instance_eval(&b) + end + end + win + end + + def set_widget(win) + tk_send_without_enc('setwidget', win) + self + end +end -- cgit v1.2.3