| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как ;в листбоксе каждую страку зделать своим цветом [D5, D6, Win95/98, Win2k, WinXP]

Diablo ©   (2002-01-31 17:38:00) 

Как в листбоксе каждую страку зделать своим цветом и своим фоном, причем цвет и фон будут зависить от текста.

---

SCat   (2002-02-01 10:22:00) [1]

и ещё добавить

ListBox1.Canvas.TextOut(Rect.Left, Rect.Top, ListBox1.Items [Index]);

а то итемов видно не будет

---

kronprince   (2002-01-31 20:06:00) [2]

См. OnDrawItem

ListBox1.Style:=lbOwnerDrawFixed;


procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
case Index of
1:ListBox1.Canvas.Brush.Color:=clRed;
2:ListBox1.Canvas.Brush.Color:=clGreen;
3:ListBox1.Canvas.Brush.Color:=clBlue;
end;
ListBox1.Canvas.FillRect(Rect);
end;


Посмотри также как сделан TColorComboBox из RXControls.

---

Наверх