Текущий архив: 2005.10.23;
Скачать: 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 вся ветка
Текущий архив: 2005.10.23;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.025 c
