diff --git a/designer/controlselection.pp b/designer/controlselection.pp
index 887396f22b..de6fbe5f01 100644
--- a/designer/controlselection.pp
+++ b/designer/controlselection.pp
@@ -2292,9 +2292,10 @@ begin
   if Count=0 then
     SetCustomForm;
   UpdateBounds;
-  SaveBounds;
   DoChange;
   EndUpdate;
+  // BoundsHaveChangedSinceLastResize does not recognize a deleted comp selection,
+  SaveBounds(false);   // thus force saving bounds now (not later).
 end;
 
 procedure TControlSelection.Clear;