Hi All
From playing around and looking through some of the
samples, it turns out that this following style option
will create a Window with cannot be resized.
-style => 1024 | WS_BORDER | WS_CAPTION | WS_SYSMENU |
WS_MINIMIZEBOX | WS_MAXIMIZEBOX,
I don't know what the 1024 does but it works..
Enjoy the weekend everybody and again if anybody wants
to post samples etc that would be nice for us beginners :>)
Barry
> -----Original Message-----
> From: Philip A. Larson [SMTP:[EMAIL PROTECTED]]
> Sent: Wednesday, March 24, 1999 10:56 PM
> To: [EMAIL PROTECTED]
> Subject: RE: [perl-win32-gui] Window Question
>
> Yes, I thought about the timer solution last night. I tried it at 50 msecs
> and it creates just as an annoying flashing effect as the resize solution.
>
> Phil Larson
>
> > -----Original Message-----
> > From: [EMAIL PROTECTED]
> > [mailto:[EMAIL PROTECTED]]On Behalf Of David Hiltz
> > Sent: Wednesday, March 24, 1999 9:53 AM
> > To: [EMAIL PROTECTED]
> > Subject: Re: [perl-win32-gui] Window Question
> >
> >
> > > Can anyone tell me how to prevent a Window from being resized
> > and moved? I
> > > am able to capture the Resize event, but not the Move event.
> > BTW, returning
> > > "0" doesn't prevent the resizing. My work around is to reset
> > the original
> > > coordinates when I capture the resize event but this creates a
> > disturbing
> > > flashing effect as the user attempts to resize the window.
> > Nothing I do can
> > > stop it from being moved. I suspect one of the Style properties
> > will work,
> > > but I'm no good at guessing which one.
> >
> > A really bad hack would be to setup a timer that checked for new
> window
> > coordinates.
> >
> > > Bonus Question: How can I make a window stay "on top"?
> >
> > After what event?
> >
> > -David Hiltz
> >
> > >
> > > > -----Original Message-----
> > > > From: [EMAIL PROTECTED]
> > > > [mailto:[EMAIL PROTECTED]]On Behalf Of Aldo Calpini
> > > > Sent: Wednesday, March 03, 1999 1:02 PM
> > > > To: [EMAIL PROTECTED]
> > > > Subject: Re: [perl-win32-gui] Background color of rectangle
> > > >
> > > >
> > > >
> > > > -----Original Message-----
> > > > From: David Hiltz <[EMAIL PROTECTED]>
> > > > To: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
> > > > Date: luned́ 1 marzo 1999 22.39
> > > > Subject: [perl-win32-gui] Background color of rectangle
> > > >
> > > >
> > > >
> > > > David Hiltz wrote:
> > > > > I'm trying to draw a rectangle in a window using Win32::GUI::DC
> and
> > > > > I can't seem to get the background color of the rectangle to be
> the
> > > > > same as the background color of the window. The background color
> > > > > of the rectangle comes out white.
> > > > >
> > > > > Here's my code to draw a button on a window and put a red
> rectangle
> > > > around
> > > > > the button. The background color of the rectangle is
> > white instead of
> > > > > gray. I played with BackColor and BkMode but it didn't
> > seem to help.
> > > >
> > > >
> > > > the Rectangle() function draws a rectangle using the current
> > pen for the
> > > > border and the current brush, which seems to be white by
> > default, for the
> > > > inside.
> > > > you have to create a brush loading the system defined NULL_BRUSH,
> eg.
> > > > same as the window background.
> > > >
> > > > $P = new Win32::GUI::Pen(
> > > > -color => [150,0,0],
> > > > -width => 1,
> > > > );
> > > >
> > > > $NULL_BRUSH = 5;
> > > > $B = Win32::GUI::GetStockObject($NULL_BRUSH);
> > > >
> > > > $DC->SelectObject($P);
> > > > $DC->SelectObject($B);
> > > > $DC->Rectangle(10,10,66,60);
> > > >
> > > > bye,
> > > > Aldo Calpini
> > > > <[EMAIL PROTECTED]>
> > > >
> > > >
> > > >
> > >
> > >
> >
