I did look at it.  It turns out that the problem was trying to use the
GetDC method inline.

$ChildWin->GetDC->SelectObject($dragpen)

When I assigned the DC to a variable and used the variable instead

my $DCC = $ChildWin->GetDC();
$DCC->SelectObject($dragpen);

everything works just fine.  It doesn't make much sense to me why it
happens this way but at least now I know how to make it work.  I guess
that's what I get for taking shortcuts.

Thanks,
Chris

PS:  Also, I would like to apologize to the list for double posting. 
My first post didn't show up for about 8 hours so I thought something
went wrong.  As far as I can tell, the second post still hasn't shown
up but it probably will.  Again, sorry for being impatient.

On 7/11/05, Sisyphus <[EMAIL PROTECTED]> wrote:
> 
> ----- Original Message -----
> From: "Chris Rogers" <[EMAIL PROTECTED]>
> To: <[email protected]>
> Sent: Tuesday, July 12, 2005 4:16 AM
> Subject: Problems with Win32::GUI::Brush / Pen
> 
> 
> > I have been playing around with samples/BitmapScroll.pl from the
> > Win32-GUI-1.0 source using perl 5.6 on WinXP SP2.  I can't seem to get
> > a Brush or Pen working for me.  No matter what I do (so far), the
> > rectangle is drawn with the brush/pen I think I'm specifying.  Here's
> > a sample of my broken code:
> >
> 
> 'samples/Draw.pl' (in the source distro) uses Brush and Pen. I imagine
> you've checked it out already - but if you haven't, then it might help.
> 
> Cheers,
> Rob
> 
>

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to