From: Hidetoshi NAGAI <nagai@...>
Date: 2008-12-04T05:48:50+09:00
Subject: Re: tk_optionMenu in Ruby/Tk

From: Kenneth McDonald <kenneth.m.mcdonald@sbcglobal.net>
Subject: tk_optionMenu in Ruby/Tk
Date: Thu, 4 Dec 2008 01:05:36 +0900
Message-ID: <01353FAB-8102-4C41-B542-6540128B5379@sbcglobal.net>
> Does anyone know of an example that shows the correct use of  
> tk_optionMenu in Ruby/Tk? All references I can find deal with popping  
> up a "normal" menu.

Please see line:559--567 of tk/menu.rb.
For example, 
---------------------------------------------------------------------
require 'tk'

parent = Tk.root
v = TkVariable.new
TkLabel.new(parent, :textvariable=>v).pack
TkOptionMenubutton.new(parent, v, *%w(foo bar baz hoge fuga)).pack

# other style of arguments
TkOptionMenubutton.new(:parent=>parent, :variable=>v, 
                       :values=>%w(FOO BAR BAZ HOGE FUGA)).pack
Tk.mainloop
---------------------------------------------------------------------
However, 2nd style doesn't work because of a bug of tk/menu.rb. 
Please use the following patch. I'll commit it to ruby-svn.

Index: menu.rb
===================================================================
--- menu.rb	(revision 20349)
+++ menu.rb	(working copy)
@@ -569,7 +569,7 @@
     keys = _symbolkey2str(keys)
 
     parent = nil
-    if args[0].kind_of?(TkWindow) || args[0] == nil
+    if !args.empty? && (args[0].kind_of?(TkWindow) || args[0] == nil)
       keys.delete('parent') # ignore
       parent = args.shift 
     else
@@ -577,7 +577,7 @@
     end
 
     @variable = nil
-    if args[0].kind_of?(TkVariable) || args[0] == nil
+    if !args.empty? && (args[0].kind_of?(TkVariable) || args[0] == nil)
       keys.delete('variable') # ignore
       @variable = args.shift 
     else

-- 
Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)