| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Эмулировать клик мыши?
ezorcist © (2006-01-05 09:03:00)По клавишам статья есть, а что с кликами?
Gero (2006-01-06 15:59:00) [1]Послать окну WM_LBUTTONDOWN, потом WM_LBUTTONUP.
Алхимик (2006-01-06 15:59:00) [2]
> [2] ezorcist (06.01.06 15:43)
> можно по подробней)
var
Pt : TPoint;
...
{Перемещение курсора мыши}
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_MOVE, Pt.x, Pt.y, 0, 0);
{Имитируем нажатие левой кнопки мыши}
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN, Pt.x, Pt.y, 0, 0);
{Имитируем отпускание левой кнопки мыши}
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP, Pt.x, Pt.y, 0, 0);
ezorcist (2006-01-06 15:43:00) [3]можно по подробней)
ezorcist (2006-01-06 15:43:00) [4]Я хотел сказать эмулировать другм окне
begin...end (2006-01-05 09:07:00) [5]mouse_event
| |
