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

Вниз

Выделенные Items в ListView нарисованные на канвасе   Найти похожие ветки 

 
Nevil ©   (2004-04-06 23:32) [0]

Подскажите пожалуйста, как при рисовании на Canvas ListView рисовать выделенные итемы? Я использую TOwnerDrawState, но почему-то ну рисуется нужные мне вещи. Для более ясного разъяснения кусок кода:

with ListViewA,ListViewA.Canvas do
 begin
   if State<>[odFocused] then
    begin
     Brush.Color:=Color;
     Pen.Color:=Color;
     Rectangle(0,Item.Top,ListView.Width,Item.Top+30);
     Pen.Color:=FontColor;
    end else
    begin
     Brush.Color:=InActiveColor;
     Pen.Color:=FieldColor;
     Rectangle(0,Item.Top,ListView.Width-2,Item.Top+20);
     Brush.Color:=Color;
    end;
 end;


Заодно, может кто подскажет, нельзя ли изменить высоту итема, и как её определить.
Заранее спасибо.


 
Гаврила   (2004-04-06 23:45) [1]

>> if State<>[odFocused] then
Лучше
if not ([odFocused] in State)
мало ли что еще там ...


 
Игорь Шевченко ©   (2004-04-06 23:52) [2]

Может, odSelected in State ?

или ([odSelected,odFocused] * State) <> [] ?



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

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

Наверх




Память: 0.47 MB
Время: 0.067 c
14-1080746752
AlexKniga
2004-03-31 19:25
2004.04.25
Кто-нибудь установил Win2K/XP на SATA RAID без floppy?


1-1081617949
Ew
2004-04-10 21:25
2004.04.25
Ищу исходник, может быть у кого есть :)


11-1063273021
dataMaster
2003-09-11 13:37
2004.04.25
Panel и edgeStyle


14-1080799193
cyborg
2004-04-01 09:59
2004.04.25
Вышла Delphi 9


14-1080554461
pasha_golub
2004-03-29 14:01
2004.04.25
"Умный дом"