Erstellen eines Array´s von Images?

[TheAn00bis]

Wo ist denn das Problem? Beim Zugriff oder beim Hinzufügen?

Noch ein Beispiel:

Delphi-Quellcode:

procedure Test;
var ImageArray: Array of TImage;
i : integer;
begin
   length(ImageArray, 18);
   for i:=0 to 17 do 
      begin
          ImageArray[i] := FindComponent('Image'+inttostr(i+1)) as TImage;
      end;
end;

Die Prozedur fügt die Images1 bis Image18 dem Array hinzu. Die Images müssen natürlich vorher erstellt worden sein. Ich hoffe ich habe FindComponent richtig genutzt, aber ich denke schon.