From: SourceForge.net <no...@so...> - 2007-07-22 14:58:49
|
Bugs item #1731734, was opened at 2007-06-05 18:18 Message generated for change (Comment added) made by wordtech You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=112997&aid=1731734&group_id=12997 Please note that this message will contain a full copy of the comment thread, including the initial issue submission, for this request, not just the latest update. Category: 11. Aqua Menus Group: current: 8.4.15 Status: Open Resolution: None Priority: 5 Private: No Submitted By: Nobody/Anonymous (nobody) Assigned to: Daniel A. Steffen (das) Summary: Aqua preview 8.4.15 menubutton cascade menus don't display Initial Comment: In the 8.4.15 Aqua preview from DAS, cascade menus on menubuttons don't display on mouseover. You can't get to the cascaded menus. They do work fine on menus in the menubar, only problems are on menus attached to menubuttons. contact me at: m dot wayne dot davis at gmail tod com for any questions example: grid [menubutton .type -menu .type.menu -textvariable temp_info(type) -font labelfont -width 10] -row 0 -column 2 menu .type.menu set divided_typelist [list A [list 1 2 3 4] B [list 5 6 7 8]] foreach {header types} $divided_typelist { .type.menu add cascade -label $header -menu [menu .type.menu.[string tolower $header]] foreach type $types { .type.menu.[string tolower $header] add radiobutton -label $type -variable temp_info(type) -value $type -command "" ---------------------------------------------------------------------- Comment By: Kevin Walzer (wordtech) Date: 2007-07-22 09:58 Message: Logged In: YES user_id=794827 Originator: NO Popup menus also display this problem. ---------------------------------------------------------------------- Comment By: Russell Owen (reowen) Date: 2007-07-17 12:27 Message: Logged In: YES user_id=431773 Originator: NO This is also true for 8.4.15 release. Here is another example: menubutton .mb -text Menubutton -menu .mb.menu pack .mb menu .mb.menu -tearoff 0 .mb.menu add command -label MainDoIt -command {puts "MainDoIt"} .mb.menu add cascade -label Sub -menu .mb.menu.sub1 menu .mb.menu.sub1 -tearoff 0 .mb.menu.sub1 add command -label SubDoIt -command {puts "SubDoIt"} this works fine with older versions of tcl/tk (on unix and MacOS X) but not with Aqua Tcl/Tk 8.4.15. I have only run 8.4.15 on MacOS X so I have no idea if this problem also affects unix. ---------------------------------------------------------------------- You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=112997&aid=1731734&group_id=12997 |