Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Perl/Tk:swapping of frames without loosing the data

by Erez (Priest)
on Aug 12, 2008 at 08:41 UTC ( [id://703844]=note: print w/replies, xml ) Need Help??


in reply to Perl/Tk:swapping of frames without loosing the data

I doubt this part works:

if (!Exists($show_table_frame))

as the syntax is exists. You might want to use defined rather. Also, try not using our but rather define the variable outside the subroutine.

Finally, all this is overkill, where you can simply use the following:

if ($frame->ismapped) { $frame->packForget(); } else { $frame->pack(@{$frame->{PackInfo}}); }

Stop saying 'script'. Stop saying 'line-noise'.
We have nothing to lose but our metaphors.

Replies are listed 'Best First'.
Re^2: Perl/Tk:swapping of frames without loosing the data
by kapsule (Acolyte) on Aug 12, 2008 at 09:01 UTC
    Thanks a lot.. It started working.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (6)
As of 2024-03-28 13:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found