Главная страница
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.086 c
2-1168287894
Dim..ON
2007-01-08 23:24
2007.01.28
загрузка компьютера


2-1168124906
koha
2007-01-07 02:08
2007.01.28
Изменение в MassageDlg надписей на русские под Delphi2006


2-1168210228
Wind
2007-01-08 01:50
2007.01.28
Обновить занные в записи (SQL)


15-1167997822
kaZaNoVa
2007-01-05 14:50
2007.01.28
Сменить пароль Windows


2-1168331690
DelphiLexx
2007-01-09 11:34
2007.01.28
Как в DBGrid e вычислить Top и Bottom последней записи