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

Вниз

Движение курсором мыши над ListView в режиме VirtualListView   Найти похожие ветки 

 
gugua   (2006-04-30 12:53) [0]

Hola!
Пишу LVOptions:=[lvoOwnerDrawFixed ,lvoTrackSelect] ну и OwnerData тоже, таким образом формирую VirtualListView. Все хорошо работает.
В обработчике .LV1DrawItem есть такой код:

S:=ItemState;
 if (odsFocused in S) and (ItemIdx=LV1.LVCurItem) then
 //if ItemIdx=sel_item then
 begin
   myBrush.Color:=clHighlight;
   LV1.Canvas.Font.Color:=clHighlightText;
 end else
 begin
   myBrush.Color:=clWhite;
   LV1.Canvas.Font.Color:=clWindowText;
 end;


Когда курсором мыши просто проводишь (не нажимая на строки) над этим ListView то делается    myBrush.Color:=clHighlight;   LV1.Canvas.Font.Color:=clHighlightText; .
ВОПРОС: Как от этого избавится, тоесть чтоб строка подсвечивалась только при нажатии на нее, в общем как обычно?


 
homm ©   (2006-04-30 13:26) [1]

Или я чего-то не понял или lvoTrackSelect здесь лишнее.


 
gugua   (2006-04-30 13:44) [2]


> Или я чего-то не понял или lvoTrackSelect здесь лишнее.

Да вы в самом деле Мастера. Пара слов и проблема решена. Спасибо и звиняйе за свою невнимательность.

LVOptions:=[lvoOwnerDrawFixed , lvoTrackSelect]
lvoTrackSelect действительно здесь лишнее, малость перемудрил :)


 
homm ©   (2006-04-30 13:50) [3]


> Да вы в самом деле Мастера.

:))))))))))))) (самый большой смайлик, который я когда либо рисовал)



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

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

Наверх




Память: 0.47 MB
Время: 0.048 c
2-1168429086
dr_craigan
2007-01-10 14:38
2007.01.28
создание компонента


2-1168376056
Евгений Р.
2007-01-09 23:54
2007.01.28
Непонятно в Local SQL


2-1168428563
Megabyte
2007-01-10 14:29
2007.01.28
Открыть страницу в браузере без компонента TWebBrowser


1-1165327777
dreamse
2006-12-05 17:09
2007.01.28
Ошибка при загрузке компонента из файла


8-1149096765
Михайлов Антон
2006-05-31 21:32
2007.01.28
прогрессив скин