Главная страница
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.013 c
14-94570
Почемучка
2002-03-20 12:33
2002.04.29
QReport в Delphi 5.0


4-94626
Nuhim
2002-02-22 10:43
2002.04.29
Как перехватить уход мыши в правый край экрана


1-94474
radisheva
2002-04-16 13:33
2002.04.29
Кодировки


1-94498
Андрей Л
2002-04-16 00:05
2002.04.29
лимит ListBox-а.


1-94464
Reticent
2002-04-15 18:27
2002.04.29
Я походу или плохо выспался, или ооочень мало знаю, или тупой