Thema: Delphi ListBox für Bilder

Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#3

Re: ListBox für Bilder

  Alt 29. Okt 2005, 02:43
Du kannst in einer Listbox ganz einfach ein Bild darstellen.
Folgendes ist notwendig:

Im Objectinspector
- Style auf "lbOwnerDrawFixed" setzen
- ItemHeight auf den Wert setzen wie Hoch die Bilder dargestellt werden sollen

Dann das Ereignis OnDrawItem:
Delphi-Quellcode:
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: OwnerDrawState);
begin
  TListBox(Control).Canvas.StretchDraw(Rect, DeinBildWelchesGemaltWerdenSoll);
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat