While I haven't been able to get rid of the cursor change (into the resize
arrow), I've prevented people from resizing the box manually by placing the
-maxwidth and -maxheight settings in. Thanks for your tip for -maximize! It
works great, here is my window:
$Name = new Win32::GUI::Window( -name => $Name
,-text => $Main_Title
,-width => $Width
,-height => $Height
,-left => $Left
,-top => $Top
,-minwidth => $Width
,-minheight => $Height
,-maxwidth => $Width
,-maxheight => $Height
,-menu => $Menu
,-maximizebox => 0
);
-Michael Forhan
[EMAIL PROTECTED]
-----Original Message-----
From: Morbus Iff [mailto:[EMAIL PROTECTED]
Sent: Thursday, May 31, 2001 11:40 AM
To: perl-win32-gui-users@lists.sourceforge.net;
'perl-win32-gui-users@lists.sourceforge.net'
Subject: Re: [perl-win32-gui-users] Window Size Controls & Miscellany
?'s
>Is there a way to disable the Maximize button on a window? I've been using
>-maxwidth and -maxheight in the window creation in order to prevent users
>from resizing my windows (I don't really want to deal with resizing &
>repositioning quite yet...) but since the maximize button is active, the
>window does this ugly (imho) snap to the top left corner when its clicked.
You know, I was hoping for the same thing, with code like this:
$window = new Win32::GUI::Window( -name => '_Window',
-text => $SETTINGS->{app}->{name},
-left => ($screen_width - 600)/2,
-top => ($screen_height - 400)/2,
-width => 480, -height => 400,
-menu => $menu_bar,
-class => $hwnd_class,
-icon => $icon,
-maximizebox => 0
);
Unfortunately, that dims the maximize box so that it doesn't work, but
still allows people to resize the window by the grab-an-edge-and-pull
routine. I haven't figured out how to disable that. It's probably simple.
Morbus Iff
.sig on other machine.
http://www.disobey.com/
http://www.gamegrene.com/
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
