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

fixed TControl.HandleObjectShouldBeVisible to ignore loading state

Browse Source 
git-svn-id: trunk@9140 -
This commit is contained in:
mattias 2006-04-17 17:20:00 +00:00
parent 639b8b29b6
commit a7a8977dfb
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/include/control.inc
View File

@ -3008,8 +3008,7 @@ function TControl.HandleObjectShouldBeVisible: boolean;
begin
Result:=(Visible
or ((csDesigning in ComponentState)
and not (csNoDesignVisible in ControlStyle)))
and not (csLoading in ComponentState);
and not (csNoDesignVisible in ControlStyle)));
end;
{------------------------------------------------------------------------------