Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: TK Windows

by regexes (Hermit)
on Nov 12, 2007 at 13:05 UTC ( [id://650259]=note: print w/replies, xml ) Need Help??


in reply to TK Windows

Hello,

Take a look at Tk::Wm

Look for the methods resizeable, minsize, maxsize.

Should hopefully help you...

For example (note -> code untested),
$main->minsize(qw(600 600));
$main->maxsize(qw(700 1000));
$main->resizable( 0, 0 );

[download]
regexes


-------------------------
Nothing in the world can take the place of persistence. Talent will not; nothing is more common than unsuccessful men with talent. Genius will not; unrewarded genius is almost a proverb. Education will not; the world is full of educated derelicts. Persistence and determination are omnipotent. The slogan "press on" has solved and always will solve the problems of the human race.
-- Calvin Coolidge, 30th President of the USA.

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://650259]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others about the Monastery: (5)
As of 2024-04-23 20:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found