Browse Source

* Removing from previous owner after doing validation

Michaël Van Canneyt 3 years ago
parent
commit
0d7474cec4
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/rtl/classes.pas

+ 1 - 1
packages/rtl/classes.pas

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