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

Вниз

Как в листбоксе каждую страку зделать своим цветом   Найти похожие ветки 

 
Diablo   (2002-01-31 17:38) [0]

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


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

См. 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.


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

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

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

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



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

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

Наверх





Память: 0.44 MB
Время: 0.003 c
1-42763
DEPROL
2002-01-31 09:38
2002.02.14
Install Delphi5 for Win2k


1-42811
Эндрю2
2002-01-30 21:43
2002.02.14
Определение цвета в любой части экрана мышкой


3-42650
Fikov
2002-01-18 22:00
2002.02.14
Формат поля в динамически созданных таблицах


1-42718
SAlex
2002-01-30 12:01
2002.02.14
<B>Text Object Model </B>


3-42680
Dyacha
2002-01-22 10:48
2002.02.14
Гетерогенный запрос





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