paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 08:50:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: In TWinControl.Loaded send CM_PARENTCOLORCHANGED message after setting color and not after setting font

Browse Source 
git-svn-id: trunk@23256 -
This commit is contained in:
blikblum 2009-12-24 10:13:54 +00:00
parent 775a151c45
commit cd9e4a774f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/include/wincontrol.inc
View File

@ -7263,12 +7263,12 @@ begin
if wcfColorChanged in FWinControlFlags then
begin
TWSWinControlClass(WidgetSetClass).SetColor(Self);
NotifyControls(CM_PARENTCOLORCHANGED);
Exclude(FWinControlFlags,wcfColorChanged);
end;
if wcfFontChanged in FWinControlFlags then
begin
TWSWinControlClass(WidgetSetClass).SetFont(Self,Font);
NotifyControls(CM_PARENTCOLORCHANGED);
NotifyControls(CM_PARENTFONTCHANGED);
FWinControlFlags:=FWinControlFlags-[wcfFontChanged];
end;