Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Щелчок мыши программно / 5 сообщений из 5, страница 1 из 1
22.01.2024, 13:57
    #40138398
kovyl
kovyl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Щелчок мыши программно
Доброго времени суток всем!
Наверное, здесь это уже было, не смог найти. Нужно сделать программный щелчок на форме в том месте, где в данный момент находится указатель, допустим левой кнопкой мыши без Schift:
Call Form_MouseUp (1, 0, x, y)
каким образом получить координаты x и y?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.01.2024, 17:12
    #40138402
kovyl
kovyl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Щелчок мыши программно
Пытаюсь использовать API:
Код: VBA
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long

Public Type POINTAPI
    X_Pos As Long
    Y_Pos As Long
End Type

Public gHold As POINTAPI
Public gintX As Integer
Public gintY As Integer

Public Sub Get_Cursor_Pos()

    GetCursorPos gHold

    gintX = gHold.X_Pos
    gintY = gHold.Y_Pos

End Sub

'вызов в процедуре (ругается на gintX и gintY "ByRef argument type mismatch"):
GetCursorPos gHold
Call Form_MouseUp(1, 0, gintX, gintY)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать | Ответы  
16.02.2024, 19:34
    #40138463
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Щелчок мыши программно
Можно попробовать в событии MouseMove брать координаты из параметров и заносить в глобальные переменные. Не уверен, что это будет поспевать за мышкой достаточно быстро, но можно попробовать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.02.2024, 11:26
    #40138464
ShIgor
ShIgor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Щелчок мыши программно
kovyl [игнорируется] 

надо наконец не только читать сообщения об ошибках..
научитесь понимать что в них написано.
а дальше нарветесь на другое. одна функция использует координаты относительно рабочего стола, вторая относительно окна (формы).
что будет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать | Ответы  
22.02.2024, 13:44
    #40138470
kovyl
kovyl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Щелчок мыши программно
ShIgor [игнорируется] 
Разобрался. Там, оказывается, не Integer тип данных, а Single. Т.е. не gintX As Integer, а gsngX As Single. Тогда все работает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Щелчок мыши программно / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]