Главная страница
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.009 c
1-94362
Aleksandr
2002-04-17 12:19
2002.04.29
Как сделать, чтобы Делфи нормально ставила курсор на коде?


1-94506
LazorenkoX
2002-04-16 09:26
2002.04.29
record; packed record


1-94427
velial
2002-04-17 22:22
2002.04.29
процедуры


3-94263
Rail
2002-04-07 16:05
2002.04.29
Как показать последнюю ошибу при работе с БД через BDE


3-94307
только начал изучать дельфи
2002-03-23 16:27
2002.04.29
Добавление записи