Скачать: CL | DM;

Картинки в ListBox   Найти похожие ветки 

← →
Object   (2005-02-23 12:14) [0]

Уважаемые мастера!
Возможно ли занесение в ListBox картинок вместо текста?
Если нет, то как можно сделать что-то подобное ListBox с картинками?
Спасибо.

---

← →
Набережных С. ©   (2005-02-23 14:54) [1]


type
 TListBox2 = class(TListBox);

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
 Rect: TRect; State: TOwnerDrawState);
begin
 TListBox2(Control).Canvas.Draw(Rect.Left, Rect.Top, Image1.Picture.Graphic);
end;



---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.025 c