![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Эмуляция клика мышки [D1, D2, D3, D4, D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]
Jorchick © (2002-01-21 14:04:00)Народ, подскажите как эмулировать нажатия кнопки мышки.
МИФИст (2002-01-23 17:02:00) [1]Вот нашёл: Использование процедуры mouse_event(), там ещё куча интересной и полезной инфы!
http://delphinium.narod.ru/faq/WinApiFAQ.htm
Victorbur (2002-01-22 12:23:00) [2]SendMessage({где кликать}, WM_LBUTTONDOWN, 0, 0);
SendMessage(bbOk.Handle, WM_LBUTTONUP, 0, 0);
BiJi (2002-01-21 18:16:00) [3]Вот процедура опускает и поднимает левую кнопку мыши не перемещая её по экрану
procedure TForm1.MClick;
begin
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN, 0,0,0,0);
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP, 0,0,0,0);
end;
МИФИст (2002-01-21 17:33:00) [4]Если я правильно тебя понял, то в 6 Дельфях:
например:
Form1.Button1.Click;
а в других вот так:
Form1.Button1Click(Button2); в качестве Sender, может быть что угодно. (Здесь при нажатии на кн.2 будет выполняться действия кн.1).
Serghei (2002-01-21 14:39:00) [5]Component.Perform(WM_LBUTTONDOWN ili WM_RBUTTONDOWN,...) и далее по хелпу если не ошибаюсь!
Удачи!