Image über einer Listbox anzeigen lassen

[Nogge]

Habs endlich selbst lösen können:

Delphi-Quellcode:

    Panel:=TPanel.Create(self);
    Image:=TImage.Create(self);
    try
      Panel.Left:=vLEFT;
      Panel.Top:=vTOP;
      Panel.Width:=vWIDTH_1;
      Panel.Height:=vHEIGHT_1;
      Panel.Parent:=Form;
      Image.Left:=0;
      Image.Top:=0;
      Image.Width:=vWIDTH_2;
      Image.Height:=vHEIGHT_2;
      Image.Parent:=Panel;
      Image.Picture.LoadFromFile(FileName);
    finally
      Image.Free;
      Panel.Free;
    end;

Ich wünsche euch ein frohes, neues Jahr!