Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.08;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

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

Наверх




Память: 0.44 MB
Время: 0.007 c
1-24534
So_Nic
2003-08-26 17:28
2003.09.08
ListBox


1-24437
grusty
2003-08-25 17:56
2003.09.08
Вставка текста в определенное место RichEdit


1-24504
Lina
2003-08-27 09:43
2003.09.08
Регистрация


1-24491
BOA_KAA
2003-08-26 16:10
2003.09.08
PowerPoint


3-24387
Alibaba
2003-08-15 11:37
2003.09.08
TQuery





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский