AnchorDocking: Closing with caFree with PopupMenu added, missed part of revision 64798 #970b6b43d6, issue #38296

git-svn-id: trunk@64805 -
This commit is contained in:
michl 2021-03-14 13:43:49 +00:00
parent 6b6de2da43
commit 9777df5da6

View File

@ -5748,9 +5748,7 @@ begin
if IsMainForm then if IsMainForm then
Application.Terminate Application.Terminate
else begin else begin
NeedEnableAutoSizing:=false; Close;
Release;
AForm.Release;
exit; exit;
end; end;
end; end;