Эмуляция клика мышки

← →
Jorchick (2002-01-21 14:04) [0]

Народ, подскажите как эмулировать нажатия кнопки мышки.

← →
Serghei (2002-01-21 14:39) [1]

Component.Perform(WM_LBUTTONDOWN ili WM_RBUTTONDOWN,...) и далее по хелпу если не ошибаюсь!

Удачи!

← →
МИФИст (2002-01-21 17:33) [2]

Если я правильно тебя понял, то в 6 Дельфях:
например:
Form1.Button1.Click;
а в других вот так:
Form1.Button1Click(Button2); в качестве Sender, может быть что угодно. (Здесь при нажатии на кн.2 будет выполняться действия кн.1).

← →
BiJi (2002-01-21 18:16) [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;

← →
Victorbur (2002-01-22 12:23) [4]

SendMessage({где кликать}, WM_LBUTTONDOWN, 0, 0);
SendMessage(bbOk.Handle, WM_LBUTTONUP, 0, 0);

← →
МИФИст (2002-01-23 17:02) [5]

Вот нашёл: Использование процедуры mouse_event(), там ещё куча интересной и полезной инфы!
http://delphinium.narod.ru/faq/WinApiFAQ.htm

Эмуляция клика мышки Найти похожие ветки