diff --git a/designer/designer.pp b/designer/designer.pp
index a3a768a4a1..e51e0935e7 100644
--- a/designer/designer.pp
+++ b/designer/designer.pp
@@ -865,6 +865,7 @@ begin
   or Selection.LookupRootSelected then exit;
   Selection.MoveSelection(DiffX, DiffY, False);
   Modified;
+  Form.Invalidate;
 end;
 
 procedure TDesigner.NudgeSize(DiffX, DiffY: Integer);