diff --git a/components/anchordocking/anchordocking.pas b/components/anchordocking/anchordocking.pas
index f18f25c167..766d7899ee 100644
--- a/components/anchordocking/anchordocking.pas
+++ b/components/anchordocking/anchordocking.pas
@@ -5748,9 +5748,7 @@ begin
               if IsMainForm then
                 Application.Terminate
               else begin
-                NeedEnableAutoSizing:=false;
-                Release;
-                AForm.Release;
+                Close;
                 exit;
               end;
             end;