Вниз
Скачать: 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
14-1128350734
Карелин Артем
2005-10-03 18:45
2005.10.23
5 писем с вложениями base.crc, base.001, base.002. Как сделать 1?


2-1127819918
saimonz
2005-09-27 15:18
2005.10.23
Delphi 2 C#


5-1103884467
Anatoly
2004-12-24 13:34
2005.10.23
Сохранение не published-свойства компонента в dfm


14-1128316032
Тульский
2005-10-03 09:07
2005.10.23
Файервол для среднего пользователя


11-1109243001
Uli
2005-02-24 14:03
2005.10.23
переход между контролами по Enter




   Наверх