Получить координаты иконки на десктопе

[Williams]

Как можно получить координаты конкретного значка на рабочем столе?

Желательно расстояние от верхнего левого края в пикселях.



Спасибо за ответ!

[Хакер]

LVM_GETITEMPOSITION

[Williams]

С какими системами совместим этот метод?

[Хакер]

Со всеми, начиная с Windows NT 3.51 (в линейке NT) и Windows 95 (в линейке 9x), если вопрос был об операционных системах.

[Williams]

Да, вопрос был именно в этом. Слышал что на каких-то системах он вызывает ошибки. Есть пример, желательно работоспособный под .Net?

[Хакер]

Примеры под .net, работоспособные и неработоспособные, и не только примеры, но и всё остальное, имеющее отношение к .net обсуждается в другом разделе.

[Williams]

Ладно - просто не хотел создавать отдельную, повторную тему.

Код на VB6 также подойдет.

[Хакер]

Williams
Что не позволяет написать такой код самому?

[Williams]

Хакер



Вот тут описание метода:

http://msdn.microsoft.com/en-us/library/bb761048(VS.85).aspx



Что я должен указывать в последнем параметре для получения координат?



SendMessage( Это_Понятно, LVM_GETITEMPOSITION, Индекс, НЕ_понятно )



Да, опять-таки, мне нужно .Net решение. Можете переместить тему в другой раздел.



Спасибо

[Хакер]

В качестве последнего параметра ты должен передать указатель на структуру (т.е. адрес этой структуры) POINT, в которую обработчик сообщения запишет нужные координаты.

Решение для VB6:

Код: Выделить всё

Dim ItemCoordinates As POINT       ' Не забываем об UDT "POINT".

...

' А теперь всё зависит от того, как объявлен последний аргумент
' функции SendMessage()

' Если там ByVal ... As Long, то:
SendMessage( Это_Понятно, LVM_GETITEMPOSITION, Индекс, VarPtr(ItemCoordinates))

' Если там ByRef ... As Any, то:
SendMessage( Это_Понятно, LVM_GETITEMPOSITION, Индекс, ItemCoordinates)


Теоретически возможен блэк-кодинговый трюк, заключающийся в объявлении локальных переменных ItemX и ItemY as Long, и передачи в качестве последнего параметра ByVal VarPtr(ItemX).

При этом, надо сделать всё, чтобы оптимизатор не испортил замысла. Без понимания сути, использовать не рекомендую.

[Williams]

Хакер

пришлось существующий сишарповский код все-таки конвертировать )

Столько заморочек ради такой, казалось бы, несложной задачи, но стоило того