Гость
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / как сымитировать клик мыши / 5 сообщений из 5, страница 1 из 1
26.05.2004, 19:31
    #32535491
roleks
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как сымитировать клик мыши
именно сымитировать

для чего?
например, на кнопке в ДВ остается фокус после клика, его надо убрать

....
...
Рейтинг: 0 / 0
26.05.2004, 20:41
    #32535547
PaulJB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как сымитировать клик мыши
[DECLARATION]
Function ulong SendMessage (ulong hWnd, uint Msg, ulong wParam, ulong lParam) Library "USER32.DLL" Alias for "SendMessageA"

[PowerScript]
sendmessage( hWnd, 513, X, Y ) // Жмем
sendmessage( hWnd, 514, X, Y ) // Отпускаем
...
Рейтинг: 0 / 0
26.05.2004, 20:44
    #32535551
Филипп
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как сымитировать клик мыши
Глупость, конечно, но можно использовать SendInput Win32 API.
При этом нужно будет вычислить абсолютные координаты такого места в datawindow, в котором клик мыши не вызовет исполнения какого нибудь вашего (или native) кода, короче флаг вам в руки :-)
...
Рейтинг: 0 / 0
27.05.2004, 11:46
    #32536285
alexis glinski
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как сымитировать клик мыши
a escho vmesto button'a mozhno ispol'zovat' text control, u kotorogo mozhno izmenyat' border ;)
...
Рейтинг: 0 / 0
27.05.2004, 12:54
    #32536537
PaulJB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как сымитировать клик мыши
для отключения фокуса на батоне Datawindow я делал так:

sendmessage( hanle(dw), 513, 0, 0 ) // Жмем
sendmessage( handle(dw), 514, 0, 0 ) // Отпускаем

Конечно если в координатах 0,0 нет контролов получающих фокус ввода.
У меня (обычно) никогда так не бывает.
...
Рейтинг: 0 / 0
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / как сымитировать клик мыши / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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