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

Missed your question the first time...

by Rhose (Priest)
on Sep 21, 2001 at 17:00 UTC ( #113867=note: print w/replies, xml ) Need Help??


in reply to Previously asked Tk question

I hope this snippet will help you.

#-- Just for clarity, here is the hash array used in the snippet my %_MAINWIN = ( 'title' => 'Oracle User Manager for Baan ('.$_VERSION.')' +, 'width' => 790, 'height' => 565, 'row_height' => 25, 'radioratio' => 1.0, 'buttonratio' => 1.0, ); #-- Create and center the main window $mMainWindow = MainWindow->new; $mMainWindow->title($_MAINWIN{title}); $mWinX = int(($mMainWindow->screenwidth-$_MAINWIN{width})/2); $mWinY = int(($mMainWindow->screenheight-$_MAINWIN{height})/2); $mMainWindow->geometry ( $_MAINWIN{width} . 'x' . $_MAINWIN{height} . '+' . $mWinX . '+' . $mWinY ); $mMainWindow->resizable($_FALSE, $_FALSE);

Anyway, the quick answer is centering is done with geometry. Please post here if you have additional questions (or if I missed the actual question. *Smiles*)

Update Yeah, what MZSanford said... *Smiles*

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (4)
As of 2019-08-24 17:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?