Форум: "Основная";
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];

Вниз

цвет   Найти похожие ветки 

← →
MBo   (2002-02-04 14:17) [2]

на CustomDrawItem и subItem делай что-нибудь такое:
case Item.Index mod 3 of
0:Sender.Canvas.brush.Color := clGreen;
1:Sender.Canvas.brush.Color := clBlue;
2:Sender.Canvas.Font.Color := clRed;
end;

---

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

Форум: "Основная";
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.004 c