> 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]>
> >
> >
> >
>
>
