Sejam bem vindos ao nosso forum, onde havera hacks, utilitários tutoriais e dicas para diversos jogos, fique conosco e desfrute do melhor.

Movendo o mouse com teclado

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Movendo o mouse com teclado

Mensagem por Mr.Positive em Qua Jan 12, 2011 4:55 pm

Adicione um timer no seu formulario, deixa o interval dele em 1
no ontimer do seu timer
apague Begin e end
e adicione os segintes códigos

const
Rapidez = 10;
var
Pos: TPoint;
Key: Byte;
begin
for Key:= 8 to 222 do
begin
if GetAsyncKeyState(Key)=-32767 then
begin
GetCursorPos(Pos);
case Key of
//se for pressionada a tecla para a esquerda
37: SetCursorPos(Pos.X-Rapidez, Pos.Y);
//se for pressionada a tecla para cima
38: SetCursorPos(Pos.X, Pos.Y-Rapidez);
//se for pressionada a tecla para a direita
39: SetCursorPos(Pos.X+Rapidez, Pos.Y);
//se for pressionada a tecla para baixo
40: SetCursorPos(Pos.X, Pos.Y+Rapidez);
//se for pressionado ENTER
VK_RETURN:
begin
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
end;
//se for pressionado SHIFT da direita
VK_RSHIFT:
begin
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);
end;
end;
end;
end;
end;

Mr.Positive
Membro
Membro

Mensagens : 40
Agradecimentos : 0
Data de inscrição : 12/01/2011
Idade : 21
Localização : Recreio
Humor : Feliz !
0 / 1000 / 100



Ver perfil do usuário

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum