Главная страница
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
3-1163059970
DelphiLexx
2006-11-09 11:12
2007.01.28
Заблокировать запись


9-1140551717
DR0N
2006-02-21 22:55
2007.01.28
Оцените игру ;)


15-1167474376
IMHO
2006-12-30 13:26
2007.01.28
MS Word и кубковые сетки


2-1168414839
DelphiLexx
2007-01-10 10:40
2007.01.28
Помогите создать аналог распределения MessageBox a


15-1168256520
Empleado
2007-01-08 14:42
2007.01.28
Что можно показать иностранцам?