Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^2: How to Change Defaults in Basic Tk Menu

by roho (Bishop)
on Aug 29, 2020 at 23:29 UTC ( [id://11121188]=note: print w/replies, xml ) Need Help??


in reply to Re: How to Change Defaults in Basic Tk Menu
in thread How to Change Defaults in Basic Tk Menu

Thank you choroba! I used your second option. It works perfectly. I searched but could not find anything remotely resembling the steps you laid out. How on earth (and from where) did you dig out those details? Thanks again.

"It's not how hard you work, it's how much you get done."

  • Comment on Re^2: How to Change Defaults in Basic Tk Menu

Replies are listed 'Best First'.
Re^3: How to Change Defaults in Basic Tk Menu
by choroba (Cardinal) on Aug 30, 2020 at 14:01 UTC
    Experience with Tk, documentation of Tk::Menu, plus Data::Dumper and a few lines like
    print Dumper($menu->entrycget(0, '-menu')); print Dumper($menu->entrycget(0, '-menu')->entrycget(0, '-label'));

    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others about the Monastery: (8)
As of 2024-04-24 10:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found