try
sub Main_Resize {return 0;}
That is supposed to cancel the default behavior of the resize function.
Well, that's what it says on the box ;-) If it doesn't work, try
$resizing = 0;
sub Main_Resize
{
unless ($resizing++)
{
$Main->Change (-size => [800, 574]);}
$resizing = 0;
}
return 1;
}
that would at least have it snap back after resizing.
Note the flag to prevent an endless loop and note return 1 because the last
command was $resizing = 0 and you shouldn't do that ... even though this is
only needed when the above doesn't work, which was ... returning 0 ... oboy
...
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> Sent: Monday, April 22, 2002 18:52
> To: Peter Eisengrein
> Cc: perl-win32-gui-users@lists.sourceforge.net
> Subject: RE: [perl-win32-gui-users] status bar
>
>
>
> i don't think thats what i'm trying to do. i'll explain. i
> have a window
> that 800x574 (cuts off just above the taskbar). i've disabled
> the maximise
> button and the window isn't resizable. i decided to put a
> status bar down
> the bottom cos otherwise it just looked really ugly but i can
> resize the
> window using the status bar. the status bar servers no
> function its just
> there to look pretty and i don't want it to be able to resize
> the window.
> hope thats a little clearer.
>
> thanx
>
>
>
>
>
>
> Peter Eisengrein
>
> <[EMAIL PROTECTED]>
> To: "'[EMAIL PROTECTED]'" <[EMAIL PROTECTED]>,
> Sent by:
> perl-win32-gui-users@lists.sourceforge.net
> [EMAIL PROTECTED]
> cc:
> eforge.net
> Subject: RE: [perl-win32-gui-users] status
>
> bar
>
>
> 23/04/02 01:26 AM
>
>
>
>
>
>
>
>
>
>
> In your _Resize sub do not resize the status bar, just move
> it (so that
> it's always at the bottom). If you do nothing then it will
> always hold its
> original position which is probably not what you want.
>
> $Window->Status->Move(0,
> $Window->ScaleHeight-$Window->Status->Height);
>
>
>
>
> > -----Original Message-----
> > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> > Sent: Sunday, April 21, 2002 20:14
> > To: perl-win32-gui-users@lists.sourceforge.net
> > Subject: [perl-win32-gui-users] status bar
> >
> >
> > is there any way to stop a status bar from being able to be resized?
> > thanx
> >
> >
> > _______________________________________________
> > Perl-Win32-GUI-Users mailing list
> > Perl-Win32-GUI-Users@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> >
>
>
>
>
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
