mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-05 10:57:55 +02:00
IDE/Help: Fixed help call for docked windows. Issue #39890
This commit is contained in:
parent
a739040362
commit
de2507fc36
@ -477,7 +477,7 @@ var
|
|||||||
begin
|
begin
|
||||||
Result:=nil;
|
Result:=nil;
|
||||||
NextParent:=TheControl.Parent;
|
NextParent:=TheControl.Parent;
|
||||||
if NextParent=nil then begin
|
if (NextParent=nil) or (NextParent.ClassName='TAnchorDockHostSite') then begin
|
||||||
CurName:=TheControl.ClassName;
|
CurName:=TheControl.ClassName;
|
||||||
ParentHelpNode:=Root;
|
ParentHelpNode:=Root;
|
||||||
end else begin
|
end else begin
|
||||||
|
Loading…
Reference in New Issue
Block a user