Вниз
Скачать: CL | DM;

TListBox   Найти похожие ветки 

 
Spinu Oleg   (2005-09-26 18:43) [0]

Есть компонент TListBox.
Как можно узнать над каким элементом (item) списка в данный момент находится курсор мыши.


 
Leonid Troyanovsky ©   (2005-09-26 18:59) [1]


> Spinu Oleg   (26.09.05 18:43)  
> Есть компонент TListBox.
> Как можно узнать над каким элементом (item) списка в данный
> момент находится курсор мыши.


Например, в OnMouseMove - ItemAtPos.

--
Regards, LVT.


 
Spinu Oleg   (2005-09-27 17:40) [2]

Сам разобрался. Вот ответ.

 // Индекс первого видимого элемента в списке
 TopIndex := SendMessage(lb.Handle, LB_GETTOPINDEX,0,0) ;
 // Позиция курсора мыши относительно экрана
 GetCursorPos(pMouse);
 // Позиция курсора мыши оносительно верхнего угла
 pLb := lb.ScreenToClient(pMouse);
 // Высота элемента списка
 h := lb.ItemHeight;
 // Номер элемента над которым в данный момент находится мышь
 ItemIndex := TopIndex+Trunc(plb.Y/h);


 
Fay ©   (2005-09-27 18:05) [3]

2 Spinu Oleg   (27.09.05 17:40) [2]
>> Trunc(plb.Y/h);
div не прокатит?



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.028 c
2-1127738437
B@BY
2005-09-26 16:40
2005.10.23
Многострочный Label


14-1127905946
boriskb
2005-09-28 15:12
2005.10.23
Яндекс удивляет


2-1127911383
Deposit
2005-09-28 16:43
2005.10.23
С чего начать изучение Delphi ???


3-1126155558
Ol
2005-09-08 08:59
2005.10.23
MSSQL+ADO+TQuery+TDBEdit


14-1128079411
oldman
2005-09-30 15:23
2005.10.23
Вера, Надежда, Любовь и мать их Софья.




   Наверх