Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: Navigation and Focus - Tk Notebook Widget tabs (UPDATED)

by Anonymous Monk
on Sep 04, 2020 at 03:00 UTC ( #11121345=note: print w/replies, xml ) Need Help??


in reply to Navigation and Focus - Tk Notebook Widget tabs (UPDATED)

One

$book->focus( $book->raised ); $book->focusFollowsMouse;

or

$mw->focusFollowsMouse;

Two

$book->bind( '<Control-Tab>', \&RaiseNext ); $book->bind( '<Shift-Control-Tab>', \&RaisePrev ); sub RaiseNext { my( $nb ) = @_; $nb->raise( $nb->info("focusnext") ); } sub RaisePrev { my( $nb ) = @_; $nb->raise( $nb->info("focusprev") ); }

For my win32, Tk::DynaTabFrame doesn't change anything in your program, it actually breaks tab cycling

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://11121345]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (3)
As of 2020-10-22 00:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My favourite web site is:












    Results (225 votes). Check out past polls.

    Notices?