From: Kikutani Makoto <kikutani@...>
Date: 1997-12-11T19:24:51+09:00
Subject: [ruby-dev:1052] [1.1b1] TkRadiobutton select

きくたにです。

TkCompositeを試すべく、いろいろウィジェットを見ているのですが、
RadioButtonでわからないことがあります。

--------------------------------------------------------
require "tk"
$var = TkVariable.new
frame = TkFrame.new
frame.pack

lpr = TkRadioButton.new(frame, 
                        'value'=>'lpr', 
                        'variable'=>$var,
                        'command'=>proc {press},
                        'text'=>'send to a printer')
file = TkRadioButton.new(frame, 
                         'value'=>'file', 
                         'variable'=>$var,
                        'command'=>proc {press},
                         'text'=>'save to a file')

lpr.pack('side'=>'left')
file.pack('side'=>'left')

file.deselect
lpr.select

def press
  printf($stderr, "var = %s\n", $var)
end

Tk.mainloop
--------------------------------------------------------

と、初期で選択されてるのをlprにしたいのですが、

/usr/local/lib/ruby/tk.rb:795:in method_missing': 
private method select' called for 
#<TkRadioButton:0x401b90c0>(TkRadioButton) (NameError)
        from rb.rb:21

と言われます。tk.rbでの定義が
--------------------------------------------------------
class TkRadioButton<TkButton
  def create_self
    tk_call 'radiobutton', @path
  end
  def deselect
    tk_send 'deselect'
  end
  def select
    tk_send 'select'
  end
  def variable(v)
    configure 'variable', tk_trace_variable(v)
  end
end
--------------------------------------------------------
なので、なんで deselectが良くてselectが怒られるのかわかりません。
組み込み関数でselectがあるからかなあと思って、tk.rbのほうを
「sel」に変更すると動きました。うーむ。

-- 
人生を背負い投げ

菊谷 誠(Kikutani Makoto)  kikutani@eis.or.jp kikutani@jdc.ericsson.se
hgf03701@niftyserve.or.jp    http://www.eis.or.jp/muse/kikutani/