Mit dem Text ober mir komm ich irgendwie nicht klar.
Aber dafür habe ich was gefunden, das mir leichter erscheint

.
Der Quellcode für ein Label geht so:
var
i:integer;
----------------------
for i:= 1 to 10 do
(Findcomponent('Label'+IntToStr(i)) as TLabel).Caption:=IntToStr(i);
Das wäre der Quellcode für mein Image:
(Findcomponent('Image'+IntToStr(i))as TImage).left:=('Image'+IntToStr(i))as TImage).left+33;
(Meine Idee wäre, dass es 10 Images gibt (Image1, Image2.....Image10).
Durch das "for i:= 1 to 10 do" wird i als die Zahl nach dem Image gesetzt.
Als leichtes Beispiel:
i:=1
Image(i) = Image1
i:=2
Image(i) = Image2
i:=10
Image(i) = Image10
Nur irgendetwas stimmt nicht

und ich komm einfach nicht drauf

.
Aber eins weiss ich sicher. Wenn das irgendwie funktioniert, dann nehm ich das.