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

Вниз

Обработка OnDrawItem для ListBox а   Найти похожие ветки 

 
SergLight ©   (2002-04-17 18:35) [0]

Надо выделить некоторые элементы жирным шрифтом.
Задал Style = lbOwnerDrawFixed
написал обработчик
...
with TListBox(Control) do
begin
if Index < 5 then
Font.Style := [fsBold]
else
Font.Style := [];
Canvas.FillRect(Rect);
Canvas.TextOut (Rect.Left, Rect.Top, Items[Index]);
end;
...
но теперь ListBox постоянно мерцает.
Помогите исправить.


 
Song ©   (2002-04-17 18:43) [1]

Canvas.Font.Style:=[fsBold] else ...


 
SergLight ©   (2002-04-17 19:17) [2]

Спасибо, недоглядел видимо - пора поспать.



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

Текущий архив: 2002.04.29;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
7-94579
Albun
2002-01-31 23:47
2002.04.29
LPT Порт


4-94630
123212321
2002-02-26 09:18
2002.04.29
Изменение цвета


1-94462
ruslan_as
2002-04-16 09:23
2002.04.29
Прервать процедуру.


6-94524
Юра
2002-02-16 18:11
2002.04.29
Учет трафика Инета в локалке (WinProxy) для каждого компа


14-94570
Почемучка
2002-03-20 12:33
2002.04.29
QReport в Delphi 5.0