Вниз
Скачать: 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.036 c
6-1077128883
sergeport
2004-02-18 21:28
2004.04.25
как отослать данные формы с ENCTYPE=multipart/form-data


3-1080812013
4ward
2004-04-01 13:33
2004.04.25
кодировка foxpro


1-1081378880
Romula
2004-04-08 03:01
2004.04.25
TPageControl


4-1077407594
Sulimxar
2004-02-22 02:53
2004.04.25
Вывести текст на канву инверсным цветом


1-1081151861
Mva
2004-04-05 11:57
2004.04.25
Формат ячейки Excell




   Наверх