Fixed FindSafeNewName to return a result, was also causing issue with…

… TStructuredView which is set to not show unnamed controls (does that to hide style-related items)
Zoomicon · Jan 28, 2022 · e2b8c43 · e2b8c43
1 parent 1de6c1d
commit e2b8c43
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Zooming.Helpers/Zoomicon.Helpers.RTL/Zoomicon.Helpers.RTL.ComponentHelpers.pas b/Zooming.Helpers/Zoomicon.Helpers.RTL/Zoomicon.Helpers.RTL.ComponentHelpers.pas
@@ -29,6 +29,8 @@ function TComponentNameHelper.FindSafeNewName(const NewName: TComponentName; AOw
       Inc(counter);
       theName := NewName + IntToStr(counter);
     end;
+
+  result := theName;
 end;
 
 {$ENDREGION}