[Erilar]

Как программно нажать на левую и правую кнопки мыши?

[Assistant]

Код:

Mouse_Event(MOUSEEVENTF_LEFTDOWN,x,y,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,x,y,0,0);

[Erilar]

Mouse_Event(MOUSEEVENTF_LEFTDOWN,x,y,0,0); - Нажатие на кнопку
Mouse_Event(MOUSEEVENTF_LEFTUP,x,y,0,0); - Отпускает кнопку...
Понятно.
А как сделать, чтобы нажати было дважды?

[Assistant]

Код:

// Simulate a double click
mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
GetDoubleClickTime;
mouse_event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);

[Erilar]

Как обозначить "Х" и "У" в VAR? Пишет ошибку

[Assistant]

а как вы обозначаете их? X и Y должны быть целочисленными:

Код:

var
  x, y: integer;

[Erilar]

Сообщение от Assistant

а как вы обозначаете их? X и Y должны быть целочисленными

Я обозначил их

Код:

var x,y: cardinal;

[Assistant]

так работает или нет? ))

[Erilar]

Сообщение от Assistant

так работает или нет? ))

Да всё работает! Спасибо!