From: Peter E. <Pet...@at...> - 2002-04-22 15:26:41
|
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: ma...@mm... [mailto:ma...@mm...] > Sent: Sunday, April 21, 2002 20:14 > To: per...@li... > 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 > Per...@li... > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > |
From: <ma...@mm...> - 2002-04-23 01:57:17
|
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 <Pet...@at...> To: "'ma...@mm...'" <ma...@mm...>, Sent by: per...@li... per...@li...urc 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: ma...@mm... [mailto:ma...@mm...] > Sent: Sunday, April 21, 2002 20:14 > To: per...@li... > 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 > Per...@li... > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > |
From: Piske, H. <Har...@bo...> - 2002-04-23 02:55:52
|
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: ma...@mm... [mailto:ma...@mm...] > Sent: Monday, April 22, 2002 18:52 > To: Peter Eisengrein > Cc: per...@li... > 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 > > <Pet...@at...> > To: "'ma...@mm...'" <ma...@mm...>, > Sent by: > per...@li... > per...@li...urc > 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: ma...@mm... [mailto:ma...@mm...] > > Sent: Sunday, April 21, 2002 20:14 > > To: per...@li... > > 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 > > Per...@li... > > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > > > > > > > > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Per...@li... > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > |
From: <ma...@mm...> - 2002-04-23 03:50:15
|
wonderful. the second one worked. "Piske, Harald" <Harald.Piske@bowneg To: "'ma...@mm...'" <ma...@mm...> lobal.com> cc: per...@li... 23/04/02 12:53 PM Subject: RE: [perl-win32-gui-users] status bar 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: ma...@mm... [mailto:ma...@mm...] > Sent: Monday, April 22, 2002 18:52 > To: Peter Eisengrein > Cc: per...@li... > 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 > > <Pet...@at...> > To: "'ma...@mm...'" <ma...@mm...>, > Sent by: > per...@li... > per...@li...urc > 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: ma...@mm... [mailto:ma...@mm...] > > Sent: Sunday, April 21, 2002 20:14 > > To: per...@li... > > 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 > > Per...@li... > > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > > > > > > > > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Per...@li... > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > |