mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-01 20:12:36 +02:00
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:
parent
6b6de2da43
commit
9777df5da6
@ -5748,9 +5748,7 @@ begin
|
||||
if IsMainForm then
|
||||
Application.Terminate
|
||||
else begin
|
||||
NeedEnableAutoSizing:=false;
|
||||
Release;
|
||||
AForm.Release;
|
||||
Close;
|
||||
exit;
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user