Krótszy opis dla komponentów

Czy jest jakiś inny sposób aby odwołać się do poszczególnych komponentów.
Przykładowo mam 25 obrazków (image1,2,3...) i chciałbym żeby po kliknięciu na button pokazało mi się pierwsze 10.

Trzeba wtedy wpicać

image1.visible:=true;
image2.visible:=true;
image3.visible:=true;
itd.

Czy istnieje jakiś krótszy zapis

bardzo Prosze o POMOC!!!!!!

Nazwij Image'i Image1 Image2 itd.

For I:=1 To 10 Do TImage(FindComponent('Image'+IntToStr(I))).Visible:=true;

Albo tworz je dynamicznie i umieszczaj w tablicy array of TImage