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

fixed setcolor for streamed components

Browse Source 
git-svn-id: trunk@2272 -
This commit is contained in:
mattias 2002-08-17 23:41:12 +00:00
parent 0851e8ccab
commit dfc8b04b32
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/include/control.inc
View File

@ -408,7 +408,7 @@ end;
------------------------------------------------------------------------------}
function TControl.ColorIsStored: boolean;
begin
Result:=(Color=clBtnFace);
Result:=(Color<>clBtnFace);
end;
{------------------------------------------------------------------------------
@ -2055,6 +2055,9 @@ end;
{ =============================================================================
$Log$
Revision 1.114 2003/01/01 13:01:01 mattias
fixed setcolor for streamed components
Revision 1.113 2002/12/29 18:13:38 mattias
identifier completion: basically working, still hidden