Главная страница
    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.017 c
3-24312
lightix
2003-08-12 11:30
2003.09.08
Перехватить сообщение об ошибке Oracle


1-24519
Nestor
2003-08-27 08:09
2003.09.08
Мастера, подскажите пожалуйста как при выводе чилового значения


1-24456
Yanis
2003-08-24 02:03
2003.09.08
Выбор цвета.


6-24610
UserName
2003-07-03 20:47
2003.09.08
record и SendBuf ReceiveBuf


3-24356
ASt
2003-08-16 21:01
2003.09.08
Данные из таблицы





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский