Delphi 7 Down

Abaixo Segue o Link De Download do Programa Usado Nos Tutoriais

Servidor Deposit Files

Criando Auto Click

Díficuldade:Fácil


Adicione :
1 Timer
1 Edit
2 Buttons


Mude a propriedade enabled do timer para false


Mude o caption do Button1 para Ligar


*** o codigo nesse mesmo button que vc mudou o caption para ligar :
Código:

timer1.interval:= strtoint(edit1.text);.timer1.enabled:= true;

Agora no Button2 vc muda o caption para Desligar , e *** este codigo :

Código:
timer1.enabled:= false;
*** o code no timer caso for auto click de botao esquerdo :

Código:
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
Se for de botão direito :

Código:

mouse_event(MOUSEEVENTF_RIGHTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_RIGHTUP,0,0,0,0);

PS: Para não dar o erro "Debugger" , tem que mudar o edit1 para 1 ou para qualquer numero q tu quiser , tipo . o que vc por vai ser o intervalo de clicks ...