http://www.perlmonks.org?node_id=1014025


in reply to Re^6: Tkx g_bind to menu on listbox only for selected row
in thread Tkx g_bind to menu on listbox only for selected row

$lb->g_bind( "<Enter>", [ sub { my ( $X, $Y, $y, $lb ) = @_; warn " $X,$Y,$y,$lb " }, Tkx::Ev(qw' %X %Y %y '), $lb, ], );

Replies are listed 'Best First'.
Re^8: Tkx g_bind to menu on listbox only for selected row
by v4169sgr (Sexton) on Jan 18, 2013 at 11:11 UTC

    Thanks! That worked for me!

    Final question: The menu persists after the user has moved the mouse away from the selected row. There does not seem to be anything like "g_tk___popdown()". How can I pop down the menu?

      There does not seem to be anything like "g_tk___popdown()". How can I pop down the menu?

      You can't, that is the point/purpose/design behind tk_popup, it shows a menu, pauses your program, until user makes a selection (or escapes)

      maybe you want balloons/tooltips ?

        No good for me, as I need to call subs from the user's selection. Frustrating, as all the available documentation I've seen refers to 'the OSs native functions' for popping the menu down. I really don't want the user to have to remember to press 'Esc' to get rid of the menu!

        Windows manages to do this with its own apps, why can't Perl?

        Thanks a lot for all your help anyway!!! I've got it semi-working now but will leave it turned off by default, activatable by user option as an experiment until I find something better.