PlanetSquires Forums

Support Forums => Other Software and Code => Topic started by: Brian Chirgwin on January 17, 2010, 12:09:09 AM

Title: FireLines Control
Post by: Brian Chirgwin on January 17, 2010, 12:09:09 AM
Paul,

In the FireLines control WM_PAINT there is a call to FILLRECT that I don't think is required. At least in this case. If the backstyle (fill) is opaque then the FILLRECT the backstyle color to be outside if box if rounded edges are selected. See attached images for details.  I am using the latest version of the FireLines source posted after 3.06 was released.

Is there another reason for FillRect that I am missing or does removing the FillRect resolve the issue in all cases?


            SelectObject hDC, hBrush
'            FillRect hDC, tRect, hBrush



Title: Re: FireLines Control
Post by: Paul Squires on January 17, 2010, 05:19:38 PM
hmmm.... not sure. I must have put it there for a reason.... Maybe it affects lines rather than boxes. Not sure.

I think you may be right. I'll try it without the FillRect.

Title: Re: FireLines Control
Post by: Paul Squires on January 17, 2010, 05:29:17 PM
Yes, just move the FillRect line to the line after it, If @ed.IsLine.
I'll have the new files in the next update. I have also attached it to this post.


            SelectObject hDC, hBrush
           
            If @ed.IsLine Then
               FillRect hDC, tRect, hBrush
               'we want to create a line
               MoveToEx hDC, tRect.nLeft, tRect.nTop, ByVal %Null
               If @ed.IsVertical Then