Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Движение курсором мыши над ListView в режиме VirtualListView [Delphi, Windows]


gugua ©   (2006-04-30 12:53:00) 

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:50:00) [1]


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

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


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


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

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

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


homm   (2006-04-30 13:26:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо