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

designer: fix selection of non-visual components on the same level (bug #0015428)

Browse Source 
git-svn-id: trunk@25791 -
This commit is contained in:
paul 2010-05-31 03:35:41 +00:00
parent 81d8ef4da9
commit 0fd468ac81
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
designer/designer.pp
View File

@ -417,7 +417,7 @@ var
OldRoot: TComponent;
IsNonVisual: Boolean;
begin
if Assigned(Best) and BestIsNonVisual and (BestLevel <= Level) then exit;
if Assigned(Best) and BestIsNonVisual and (BestLevel < Level) then exit;
{$IFDEF VerboseDesignerSelect}
DebugLn(['TComponentSearch.Gather ',DbgSName(Child),' ',dbgs(AtPos),' MinClass=',DbgSName(MinClass)]);
{$ENDIF}