Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.14;
Скачать: CL | DM;

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.009 c
1-42806
Lotus
2002-01-31 21:33
2002.02.14
Что-то странное с TMemo


3-42659
Demon Ltd
2002-01-21 01:22
2002.02.14
Работа из Edit ов с базами


3-42655
kaa1971
2002-01-20 22:33
2002.02.14
Как создать новый индекс в существующей базе Paradox


3-42694
Belov
2002-01-18 15:29
2002.02.14
Запись картинки в базу


1-42717
Welder
2002-01-30 11:21
2002.02.14
TdrawGrid