Skip to content
Browse files

lcl: reset Brush.Style from bsClear to bsSolid if SetColor() is calle…

…d (issue #0021759)

git-svn-id: http://svn.freepascal.org/svn/lazarus/trunk@36808 4005530d-fff6-0310-9dd1-cebe43e6787f
  • Loading branch information...
1 parent ada075a commit e973c904e4239122a815902a423a7df6e5b3cd36 paul committed Apr 16, 2012
Showing with 2 additions and 0 deletions.
  1. +2 −0 lcl/include/brush.inc
View
2 lcl/include/brush.inc
@@ -302,6 +302,8 @@ begin
FBitmap := nil;
FColor := NewColor;
inherited SetFPColor(NewFPColor);
+ if Style = bsClear then
+ inherited SetStyle(bsSolid);
Changed;
end;

0 comments on commit e973c90

Please sign in to comment.
Something went wrong with that request. Please try again.