1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/ext/tk/lib/tkextlib/bwidget/progressdlg.rb
nagai d8465ff9ab * ext/tk/lib : improve framework of developping Tcl/Tk extension wrappers
* BWidget extension support on Ruby/Tk


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6586 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2004-07-06 09:42:12 +00:00

54 lines
1.1 KiB
Ruby

#
# tkextlib/bwidget/progressdlg.rb
# by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
#
require 'tk'
require 'tk/variable'
require 'tkextlib/bwidget.rb'
require 'tkextlib/bwidget/progressbar'
require 'tkextlib/bwidget/messagedlg'
module Tk
module BWidget
class ProgressDlg < Tk::BWidget::MessageDlg
end
end
end
class Tk::BWidget::ProgressDlg
TkCommandNames = ['ProgressDlg'.freeze].freeze
WidgetClassName = 'ProgressDlg'.freeze
WidgetClassNames[WidgetClassName] = self
def create_self(keys)
# NOT create widget for reusing the object
super(keys)
@keys['textvariable'] = TkVariable.new unless @keys.key?('textvariable')
@keys['variable'] = TkVariable.new unless @keys.key?('variable')
end
def textvariable
@keys['textvariable']
end
def text
@keys['textvariable'].value
end
def text= (txt)
@keys['textvariable'].value = txt
end
def variable
@keys['variable']
end
def value
@keys['variable'].value
end
def value= (val)
@keys['variable'].value = val
end
end