Array of Tpicture?

[Kuehter]

ok ich wollte mir das einfacher machen die bilder erkennt er sofort
Image1.Picture.LoadFromFile('Symbolik_1.jpg'); wenn ich das schreibe und zeigt sie auch direkt an
nur ich wollte die in ein array haben das unsortiert ist damit ich mit den bildern an sich noch arbeiten kann nur wenn ich die jetzt anzeigen lasse will habe ich keine ahnung wie ich das machen soll

Delphi-Quellcode:

type
  Tintegerarray = array of integer;
  Tpicarray = array of Timage;

function picload: Tpicarray;

var counter: integer;
    i,j,t: integer;

begin
  SetLength(result,9);

  for counter := Low(result) to high(Result) do
  begin
    Result[counter] := TImage.Create(nil);
    Result[counter].Picture.LoadFromFile('Symbolik_' + inttoStr(counter) + '.jpg');
  end;

  for counter := Low(result) to high(Result) do
  begin
    j := trunc(random(high(Result)))+Low(result);
    t := trunc(random(high(Result)))+Low(result);

    i := t;
    Result[t]:= Result[j];
    Result[j]:= Result[i];
  end;

end;


procedure TForm1.Button1Click(Sender:  TObject);
var
  rec : TIntegerarray;
  caller : Tpicarray;

begin
    //Image1.Picture.LoadFromFile('Symbolik_1.jpg');
   rec := bedingung ;
   caller := picload;

   Image1 := Caller[0];
   Image2 := caller[2];

end;

dachte die anzeige kann man so machen wie das mit den arrays oder habe ich mich da getäuscht?