pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxFPC:fix compile after 53713

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5539 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2016-12-18 15:53:06 +00:00
parent b00af54bb9
commit d42ba252f3
2 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
components/rx/trunk/rxmdi.pas
View File

@ -751,7 +751,8 @@ begin
FNavPanel.ChildWindowsShowLast;
FNavPanel.ShowHiddenBtnOnResize;
CloseAction:=caFree;
Owner.RemoveComponent(Self);
if Assigned(Owner) then
Owner.RemoveComponent(Self);
FNavPanel.FMainPanel.RemoveControl(Sender as TCustomForm);
Application.ReleaseComponent(Self);
end;