Mehrere Objekte in einer Schleife erzeugen

[Blup]

Ich vermute hier soll eher das Image selbst variabel sein:

Delphi-Quellcode:

function TMyForm2.GetImage(AIndex: Integer): TImage;
begin
  Result := FindComponent('Image' + IntToStr(AIndex)) as TImage;
  Assert(Assigned(Result), 'Image' + IntToStr(AIndex) + ' nicht gefunden');
end;