eine zur Laufzeit erstellte Komponente unterordnen

[isocam]

Hallo,

In meinem Programm soll es eine Bildvorschau geben. Ein Bild wird geladen und in der Vorschau werden alle anderen Bilder im Miniformat angezeigt, die im gleichen Verzeichnis sind.
Soweit so gut.
Aber: Wie kann ich diesen Film aus kleinen Bildchen in einem Panel platzieren?

Mein Ansatz:

Delphi-Quellcode:

procedure TForm1.Bildladen(quelle:Integer);
var
  srec:TSearchRec;
  pfad:String;
  mbcounter,l:Integer;
begin

  case quelle of
    1: begin
         image1.picture.loadfromfile(paramstr(1));
         pfad:=ExtractFilePath(paramstr(1)); end;
    2: begin
         image1.picture.loadfromfile(openpicturedialog1.filename);
         pfad:=ExtractFilePath(openpicturedialog1.FileName); end;
  end;
  pfad:=pfad + '*.bmp';

  mbcounter:=0;
  l:=5;
  if FindFirst(pfad , faAnyFile, srec) = 0 then begin
    try
      repeat

        listbox1.Items.Add(srec.Name);

        minibild:=TImage.Create(self);
        minibild.Parent:=self;  //hat mein Problem mit dieser Zeile zu tun?

        minibild.Name:='minibild_'+InttoStr(mbcounter);

        minibild.SetBounds(l,420,60,60);

        minibild.Stretch:=true;
        minibild.Picture.LoadFromFile(srec.Name);
        Inc(l,65);
        Inc(mbcounter);

      until FindNext(srec) <> 0;
    finally
      FindClose(srec);
    end;
  end;

end;

Wenn in der Zeile mit dem Kommentar statt self panel2 oder panel2.parent hinschreibe , sind die Bildchen gar nicht mehr zu sehen.