Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как определить, над каким item (в ListView) находиться курсор?


Trubis ©   (2005-09-07 11:05:00) 

собствено сабж


Trubis   (2005-09-07 12:08:00) [1]

спасибо
дай Бог Вам здоровья


ECM   (2005-09-07 11:58:00) [2]

Упс... Опечатка... [1] 3-я строка снизу должна быть такой:
ListView1.Perform( LVM_SUBITEMHITTEST, 0, Integer( @HTI ) );


ECM   (2005-09-07 11:56:00) [3]

var
 P: TPoint;
 HTI: TLVHitTestInfo;
...

 GetCursorPos(P);
 P := ListView1.Screen2Client( P );
 HTI.pt.x := P.X;
 HTI.pt.y := P.Y;
 fOwner.Perform( LVM_SUBITEMHITTEST, 0, Integer( @HTI ) );
 ...HTI.iItem; // <- строка
 ...HTI.iSubItem; // <- столбец


Наверх

Титульная страница Поиск, карта сайта Написать письмо