Страница: 1 |
Private Declare Function SetCursorPos Lib "user32" Alias "SetCursorPos" (ByVal x As Long, ByVal y As Long) As Long Так ты расположиш его по X и Y А вот Z наверно придется реализовать путем смены значка курсора на больший\меньший позиционирование по х и у Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long Dim xpos, ypos Страница: 1 |
Вопрос: Please help! как позиционировать курсор по X,Y,Z
Добавлено: 05.06.04 16:46
Автор вопроса: Michael_m_m
Нужна помощь в таком вопросе, как позиционировать курсор по X,Y,Z т. е
Скажем, крутя колесо мыши, курсор как бы проваливался в глубь экрана.
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #1
Добавлено: 05.06.04 16:50
Номер ответа: 2
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #2
Добавлено: 05.06.04 23:55
ну я думаю что вообще придётся использовать не курсор мыши, он для увеличенияуменшения сам по себе маловат, тут лучше (я так думаю) что-то поверх курсора прилепить, например форму, а на ней имидж, угол имиджа и будет X,Y, а Z, размер формы с имиджом, за одно имидж и картинку растягивать/сжимать будет, т.е. эфект проваливания в глубь экрана.
Номер ответа: 3
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #3
Добавлено: 06.06.04 08:17
Имидж? Ты предлагаешь курсор с квадратным фоном?
Номер ответа: 4
Автор ответа:
Barsik
Разработчик Offline Client
ICQ: 343368641
Вопросов: 17
Ответов: 686
Web-сайт:
Профиль | | #4
Добавлено: 07.06.04 14:25
xpos = позиция по х в пикселях
ypos = позиция по у в пикселях
SetCursorPos xpos, ypos
ну а как ты по z собрался отображать, тем более управлять.... непонятно
Номер ответа: 5
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #5
Добавлено: 07.06.04 15:29
Ну, управлять можно колесиком, а отображать, например, прозрачным прямоугольным параллелепипедом...