diff --git a/designer/controlselection.pp b/designer/controlselection.pp
index 3e15ee767e..0a759d90c1 100644
--- a/designer/controlselection.pp
+++ b/designer/controlselection.pp
@@ -759,6 +759,7 @@ begin
       FOldWidth:=r.Right-r.Left;
       FOldHeight:=r.Bottom-r.Top;
     end;
+    FOldFormRelativeLeftTop:=Owner.Mediator.GetComponentOriginOnForm(TComponent(FPersistent));
   end else begin
     GetComponentBounds(TComponent(FPersistent),
                        FOldLeft,FOldTop,FOldWidth,FOldHeight);