Image über einer Listbox anzeigen lassen

[.Chef]

Jup, genau dafür tuts das Panel. BTW: Netter Desktop. ;-)

[Nogge]

mmh, ich wollte eigentlich so wenig Komponenten wie nur möglich verwenden. Der Skin sollte eigentlich nur ein Image aus vielen verschiedenen, zusammengesetzten Bitmaps sein...

[Matze]

Also das würde ich, wenn, dann auch mit einem Panel machen. Das kann man auch einfach ein- und ausblenden.
Nur wird das eine Komponente sein, geht aber natürlich auch recht einfach nit einem Panel. Wenn man BevelOuter auf bvNone stellt, sieht man das Panel nachher auch nicht mehr.

[Nogge]

Ok, dann werde ich es wohl leider so machen müssen. Vielen Dank für eure Hilfe.

Zitat:

BTW: Netter Desktop. Wink

=> thx ;-)

Frohe Weihnachten noch und juten Rutsch ins neue Jahr.
Nogge

[Nogge]

eins noch^^
Habe gerade herausgefunden, dass man auf ein Panel nichts zeichnen kann (es gibt kein "canvas" + "draw"). Versuche gerade (bisher vergeblich) ein zur Laufzeit erstelltes Image auf ein zur Laufzeit erstelltes Panel zu setzen. Könnt ihr mir noch einmal helfen?

[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!