So ähnlich mache ich das immer. Allerdings müsste LblArr eine variable des Forms sein, am besten eine TList<Label>.
Man kann die Labels dann bei bedarf auch leicht zusätzliche Labels anfügen und sie jederzeit finden.
Parent sollte man allerdings zuletzt zuweisen und ATarget Begin/EndUpdate verwenden.