Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c
7-1077469102
Vlad25
2004-02-22 19:58
2004.04.25
Как получить буквы cd-приводов?


11-1064908577
Yrasikombo
2003-09-30 11:56
2004.04.25
В Delphi 7 выдает ошибку "File not found: Exptlntf.dcu "


1-1081251090
Станислав
2004-04-06 15:31
2004.04.25
Создание объекта класса


1-1081655025
Aramis
2004-04-11 07:43
2004.04.25
Нестандартные курсоры


7-1077879637
Ozone
2004-02-27 14:00
2004.04.25
модель материнской платы




   Наверх