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

TListView с разноцветными Items в режиме vsReport   Найти похожие ветки 

← →
Coolguy   (2003-08-28 09:14) [0]

Очень хочется организовать TListView с разноцветными (чередующимися) Items в режиме vsReport, но я не знаю - как? Известно только, что этот вопрос вроде как "много раз тут задавался" и что надо использовать событие OnAdvancedCustomDraw. Проблема только в том, что я никогда ещё не сталкивался с OwnerDraw, вообще, то есть очень слабо себе представляю, как это всё нужно писать? Да, я прочитал Help к этому событию - помогло мало; поискал примеры на эту тему - не нашёл ни одного! Потому вопрос - может быть кто-то сможет подсказать, где взять подобный пример? Или просто запостить кусок кода прямо сюда? Буду безмерно благодарен!

P.S. А может быть существует компонент, которые реализует раскрашивание Items в TListView? Опять же, я такого не нашёл, но может проглядел чего...

---

← →
dataMaster ©   (2003-08-28 09:39) [1]


procedure TForm1.ListView1.CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
with ListView1.Canvas.Brush do
if Odd(Item.Index) then
Color:=clRed // НЕЧЕТНАЯ СТРОКА
else
Color:=clGreen; // ЧЕТНАЯ СТРОКА
end;

---

← →
Coolguy   (2003-08-28 10:55) [2]

Спасибо!

---

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

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



Память: 0.45 MB
Время: 0.016 c