Adjusted the component insertion implementation, which did not remove the component from the original owner, only added in the other owner.

packages/rtl/classes.pas

@@ -5199,6 +5199,8 @@ procedure TComponent.InsertComponent(AComponent: TComponent);
 
 begin
   AComponent.ValidateContainer(Self);
+  if AComponent.FOwner <> nil then
+    AComponent.FOwner.RemoveComponent(AComponent);
   ValidateRename(AComponent,'',AComponent.FName);
   Insert(AComponent);
   If csDesigning in FComponentState then