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

lcl: removed redundant assignments in CMParentColorChanged, CMParentShowHintChanged, CMParentBidiModeChanged

Browse Source 
git-svn-id: trunk@23245 -
This commit is contained in:
blikblum 2009-12-23 18:54:46 +00:00
parent 7f97b21ff5
commit 55d2de062f
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/include/control.inc
View File

@ -759,10 +759,7 @@ begin
if csLoading in ComponentState then Exit;
if FParentColor then
begin
Color := FParent.Color;
FParentColor := true;
end;
end;
{------------------------------------------------------------------------------
@ -775,10 +772,7 @@ begin
if csLoading in ComponentState then Exit;
if FParentShowHint then
begin
ShowHint := FParent.ShowHint;
FParentShowHint := True;
end;
end;
{------------------------------------------------------------------------------}
@ -4919,7 +4913,6 @@ begin
begin
if FParent <> nil then
BidiMode := FParent.BidiMode;
ParentBidiMode := True;
end;
end;