Hola, buenas a todos, mi nombre es Miguel. Mi problema es este:
He creado un Autoclick para un juego pero no tengo ni idea de como agregarle ''hotkeys'', osea, que se inicie con ''F2'' y se pare con ''F3'' por ejemplo.
He de decir que no se nada de programación, he hecho algunas cosas simples en Visual Basic pero siempre con la ayuda de guías en internet, si me pueden ayudar sería de gran utilidad.
El proyecto consta de un ''timer'', una caja de texto para poner los intervalos y dos ''buttons'', uno para parar y otro para iniciar, ahi es donde me gustaría agregarle unos ''hotkeys'' para poder iniciar y parar el Autoclick pulsando ''x'' tecla.
El code es este:
Código:
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Timer1.Interval :=STRToint (Edit1.Text);
Timer1.Enabled := True ;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Timer1.Enabled :=False;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0 );
Mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
end;
end.
Muchas gracias.