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

Вниз

TListBox перерисовка   Найти похожие ветки 

 
VirEx(work)   (2010-11-19 13:30) [0]

TListBox
стиль - lbOwnerDrawFixed
в OnDrawItem меняю например стиль шрифта или цвет, но перерисовка строки в списке происходит только если его пролистать или закрыть/открыть форму на которой этот контрол

пример:
 with Control as TListBox, Canvas do
 begin
   FillRect(Rect);
   if TContact(Items.Objects[Index]).IsAdmin then
     Canvas.Font.Style := [fsBold];
   MoveTo(Rect.Left + 2, Rect.Top);
   SetTextAlign(Canvas.Handle, TA_LEFT or TA_UPDATECP);
   TextOut(0, 0, Items[Index]);
 end;


invalidate и repaint зацикливают перерисовку, в результате программа грузит процессор и контрол мерцает


 
clickmaker ©   (2010-11-19 13:42) [1]

with Control as TListBox, Canvas

тут случаем не канва ли формы юзается?


 
VirEx(work)   (2010-11-19 13:44) [2]

она самая


 
clickmaker ©   (2010-11-19 13:57) [3]

и почему?


 
han_malign   (2010-11-19 14:21) [4]


> invalidate и repaint зацикливают перерисовку, в результате программа грузит процессор и контрол мерцает

- потому что invalidate надо делать не в отрисовке, а там где меняется состояние данных...
Если изменение адреса Items.Objects[Index] - компонент отловит(наверное), то изменение контента ссылки он отловить не в состоянии...



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
15-1289927971
Пит
2010-11-16 20:19
2011.02.27
Изменение FormStyle в кострукторе формы


15-1289660689
Медвежонок Пятачок
2010-11-13 18:04
2011.02.27
некоторые художники утверждают ...


15-1282469891
xayam
2010-08-22 13:38
2011.02.27
Регистрация домена в зоне .рф


15-1290167268
Jeer
2010-11-19 14:47
2011.02.27
Тенденции, однако..


2-1291296114
privet123
2010-12-02 16:21
2011.02.27
Способ прочитать с диска - правильно так?