On Fri, 14 Jul 2006 23:17:01 +0200
darekm <[EMAIL PROTECTED]> wrote:
> Hi
> as in subject
>
> Darek
>
> Index: include/speedbutton.inc
> ===================================================================
> --- include/speedbutton.inc (wersja 9610)
> +++ include/speedbutton.inc (kopia robocza)
> @@ -459,7 +459,7 @@
> // ' DFCS_INACTIVE=',FLastDrawFlags and DFCS_INACTIVE,
> // ' DFCS_FLAT=',FLastDrawFlags and DFCS_FLAT,
> // '');
> - if not Transparent and (color<>clBtnFace) then begin
> + if not Transparent and enabled and (color<>clBtnFace) then begin
> Canvas.Brush.Color := Color;
> Canvas.FillRect(PaintRect);
> end;
Applied. Thanks.
Mattias
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
