
mhx
Enthusiast
/ Moderator
Oct 20, 2001, 10:04 AM
Views: 1952
|
Re: Tk Module main window size
|
|
|
Variable interpolation is a bit difficult here, because $widthx instead of $width will be treated as an identifier. The following code works:
use strict; use Tk; my $mw = MainWindow->new; my $width = $mw->screenwidth(); my $height = $mw->screenheight(); $mw->geometry("${width}x${height}+0+0"); $mw->title("WOProj"); MainLoop; Hope this helps. -- Marcus
s$$ab21b8d15c3d97bd6317286d$;$"=547269736;split'i',join$,,map{chr(($*+= ($">>=1)&1?-hex:hex)+0140)}/./g;$"=chr$";s;.;\u$&;for@_[0,2];print"@_,"
(This post was edited by mhx on Oct 20, 2001, 12:19 PM)
|