Início
Warn
Fala emos, agora a poco , eu tava finalizando um bot aki, ai eu ia coloca uma função pra da ctrl c e ctrl v numa certa frase... Ai eu fui ve na tabela de VK_Key's e não tinha o codigo das letras --'
Como axa elas?
Ai eu consegui faze por Codigo ASCII delas *-*
Mas ai tu vai lá na tabela de Keys e não tem o codigo ascii delas '-'
Tem sé o hexadecimal ( que eu não sei usa.. ), como achar o codigo ASCII das letras?
Simples:
1° Mude a propiedade KeyPreview do seu form para TRUE, pode mudar no Object Inspector ou Object View ( nunca lembro o nome disso --' ) , ou por code tbm :]
3° No evento OnKeyDown do form declare:
Ficando assim:
3° Execute ( F9 ), e pressione alguma tecla , e o label ira mudar pra o codigo ASCII dela *-*
4° Ai para utilizala com Keybd_Event eh soh usar assim:
Mais duvidas sobre o Keybd_Event, soh visita meu tutorial sobre o assunto *-*
Créditos:
Eu ._.
Como axa elas?
Ai eu consegui faze por Codigo ASCII delas *-*
- Código:
keybd_event(86, 0, 0, 0); // 86 É o codigo ASCII do V *-*
Mas ai tu vai lá na tabela de Keys e não tem o codigo ascii delas '-'
Tem sé o hexadecimal ( que eu não sei usa.. ), como achar o codigo ASCII das letras?
Simples:
1° Mude a propiedade KeyPreview do seu form para TRUE, pode mudar no Object Inspector ou Object View ( nunca lembro o nome disso --' ) , ou por code tbm :]
- Código:
procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview:= True;
end;
3° No evento OnKeyDown do form declare:
- Código:
Label1.Caption := Format('O códigoASCII da tecla eh pressionada é: %d', [Key]);
Ficando assim:
- Código:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Label1.Caption := Format('O código da tecla pressionada é: %d', [Key]);
end;
3° Execute ( F9 ), e pressione alguma tecla , e o label ira mudar pra o codigo ASCII dela *-*
4° Ai para utilizala com Keybd_Event eh soh usar assim:
- Código:
keybd_event(Aqui o codigo dela, 0, 0, 0);
Mais duvidas sobre o Keybd_Event, soh visita meu tutorial sobre o assunto *-*
Créditos:
Eu ._.
![[G]uardião](https://2img.net/h/www.webcheats.com.br/forum/images/rank/guardiao.png "[G]uardião"){kind=icon}
