Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: Tk DirSelect Buttons

by Anonymous Monk
on Apr 19, 2018 at 12:29 UTC ( [id://1213165]=note: print w/replies, xml ) Need Help??


in reply to Tk DirSelect Buttons

Tk is Tk. Use Tk::WidgetDump. Try stuff. Modal dialog doesn't need hooks its modal dialog.

Replies are listed 'Best First'.
Re^2: Tk DirSelect Buttons
by merrymonk (Hermit) on Apr 19, 2018 at 15:01 UTC
    Thank you. I used WidgetDump and got I 'display' that showed the OK button was in a tree of
    dirselect->frame1->button
    and the Cancel button was in a tree
    dirselect->frame1->button1

    I tried using the line
    $ds->frame1->button->configure(-command => [\&OK_cb]);
    to associate the sub OK_cb with the OK button. However, I got the error message

    Failed to AUTOLOAD 'Tk::DirSelect::frame1' at C:\radan-docs\radan-f\perlwork\programs\atest_x_select.pz line 14.

    pryrt suggestion has worked and let me get the selected directory but it would be good to know how to associate the sub OK_cb so that I can look at other things I may want to alter.

       $ds->frame1->button->configure

      What docs are you reading? Try ->Subwidget or ->children to find the window/object you're after

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others sharing their wisdom with the Monastery: (4)
As of 2024-04-20 02:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found