[Lazarus] customdrawn typo

Felipe Monteiro de Carvalho felipemonteiro.carvalho at gmail.com
Sun Sep 7 18:30:48 CEST 2014


thanks, applied in rev 46153

Felipe Monteiro de Carvalho

On Sun, Sep 7, 2014 at 4:54 PM, Bernd <prof7bit at gmail.com> wrote:
> svn diff customdrawn_common.pas
> Index: customdrawn_common.pas
> ===================================================================
> --- customdrawn_common.pas      (Revision 46149)
> +++ customdrawn_common.pas      (Arbeitskopie)
> @@ -699,7 +699,7 @@
>    ADest.Line(ASize.cx - 1, ASize.cy - 1, ASize.cx - 1, -1);
>    ADest.Pen.FPColor := TColorToFPColor($0099A8AC);
>    ADest.Line(1, ASize.cy - 2, ASize.cx - 2, ASize.cy - 2);
> -  ADest.Line(ASize.cx - 2, ASize.cx - 2, ASize.cx - 2, 0);
> +  ADest.Line(ASize.cx - 2, ASize.cy - 2, ASize.cx - 2, 0);
>    ADest.Pen.FPColor := TColorToFPColor($00E2EFF1);
>    ADest.Line(1, 1, ASize.cx - 2, 1);
>    ADest.Line(1, 1, 1, ASize.cy - 2);
>
>
>
> This is responsible for a small 2 pixel sized irregularitity at the
> lower right corner of a customdrawn button. I noticed it when trying
> to change the border colors to something less bright, then it becomes
> even more obvious.
>
> I needed to write this down quickly before I forget it again, so I'm
> posting it here.
>
> Bernd.
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus



-- 
Felipe Monteiro de Carvalho




More information about the Lazarus mailing list