[xaknik]

Как сделать бота который будет кликать в одну и туже точку по таймеру?

[Grosbeak_Coder]

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
var  x,y: integer;
begin
x:=10;
y:=10;
SetCursorPos(x, y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;

[Страдалецъ]

И самое главное - назвать его Дятел.

[xaknik]

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

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
var  x,y: integer;
begin
x:=10;
y:=10;
SetCursorPos(x, y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;

Спасибо тебе

Сообщение от Страдалецъ

И самое главное - назвать его Дятел.

xD