Ligar um button por atalho

[soureidosnoob 1]

como faço pra ligar um button no delphi atraves de um atalho!!!tipo eu faço o hacker ligar pressionando alguma tecla tipo como eu faço pra ligar ele apertando Insert ow algum numpad

[Owner 8]

Não entendi muito bem ! Se puder explicar melhor, não sei se é eu, ou você ! rsrs '

Mas vê se eu entendi, você quer que quando aperta Insert ( por exemplo ) aperte o button, seria assim:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

* Coloque no OnKeyPress

Agora so funciona se o program tiver aberto (:

[soureidosnoob 1]

kara vc entendeu sim!!!vc pod me passar a lista desses codigos por mp???

e onde eu adiciono esse codigo pq akie ta dando erro

[Owner 8]

No OnKeyPress do Form1, você coloca esse código:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

#45 seria a tecla Ins. Para ver outras teclas, entra neste site:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[soureidosnoob 1]

kara eu clico no form e depois em Object Inspector/Events e tem la o OnkeyPress so q qndu eu copio e colo da esse erro:

'If Key = #45 then' is not a valid indentifier

[Owner 8]

Certeza que você está colocando no lugar certo, acabei de testar, e funcionou normal !

[darkfenyx3 7]

Está certo o código que ele passou, mande a source do onkeypress para nós podermos avaliar.

 

O que você quer é "GetAsyncKeyState", faça assim, coloque numa thread(Aconselho) ou timer.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E o que você quer que ele faça, coloque no evento onclick do button.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[soureidosnoob 1]

vou postar a imagem do erro jaja edito

 

@edit

 

olha a imagem akie:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[Owner 8]

Você colo o codigo no OnKeyPress, não é isso ! você tem que apertar duas vezes para que abra o code, e crie a procedure.

Form1 > Object Inspector > Events > OnKeyPress ( aperta duas vezes no campo da frente em branco e vai abrir o code ) e cola o código fo amigo DarkFenyx:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Mas é aconselhavel colocar este codigo num timer ! e muda o Intervalo pra 1.

Para ficar mais rápido :amor:

[darkfenyx3 7]

"Intervalo pra 1", isso fará com que a aplicação fique mais lenta e o consumo da CPU seja mais elevado, aconselho a ser feito em thread.

[luxfer 0]

"Intervalo pra 1"[/color], isso fará com que a aplicação fique mais lenta e o consumo da CPU seja mais elevado, aconselho a ser feito em thread.[/color][/b]

 

nada a ver

se for somente para verificar uma tecla, interval 1 nao vai deixar mais lento nem fudendo.

 

se voce nao decorou os numeros das teclas, faz assim:

 

IF GETASYNCKEYSTATE(ord('a')) > 0 THEN BEGIN (* nao use "<>", use ">"*)

IF GETASYNCKEYSTATE(ord('b')) > 0 THEN BEGIN

IF GETASYNCKEYSTATE(ord('c')) > 0 THEN BEGIN

 

e etc...

 

se for uma tecla e nao letra/numero

 

IF GETASYNCKEYSTATE(vk_left) > 0 THEN BEGIN {seta esquerda}

iF GETASYNCKEYSTATE(vk_TAB) > 0 THEN BEGIN {tab =P}

iF GETASYNCKEYSTATE(vk_shift) > 0 THEN BEGIN {shift}

iF GETASYNCKEYSTATE(vk_control) > 0 THEN BEGIN {CONTROL}

 

se quiser mais so digita

"iF GETASYNCKEYSTATE(vk_"

e aperta ctrl+espaco e procura uma tecla la

[darkfenyx3 7]

Outro problema do interval 1 é o seguinte, ele verificará mais de uma vez, pois seu dedo até apertar a tecla e remover o dedo, será muito ruim, a menos que coloque um Timer1.Enable := False;, ai sim ficará legal.

 

Eu ainda aconselho em thread.

[pedrokkklol 0]

If Key = #45 then

Button1.click;

e no caso se for estilo alt+ l ou alguma outra coisa mais daus teclas juntas como faz?

[luxfer 0]

if (key = #45) and (key = #999999) then

button1.click;

 

acho que é isso, óbivamente troque o 999999 pela sua tecla =p

 

 

mas usando do jeito acima, seu programa só detectara a tecla se ele estiver em FOCO, se vc minimizar ele por exemplo, nao ira detectar teclas

se é assim que voce quer, tá perfeito.

[Owner 8]

Sim !

Mas é mais aconselhável usar esse código:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Tem mais "jeito", "cara" de funciona. :amor:

Mas então funcionou ou não autor do tópico ?

Você sumiu, tem que dizer pra fechar o tópico

[darkfenyx3 7]

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[soureidosnoob 1]

owner se eu passa minha source vc pod colocar o codigo e me passar???

me add no msn

[email protected]

[luxfer 0]

afs

parece que tudo que falamos foi em vão

será q ele leu?

 

povo se recusa a pensar

ai é foda

[soureidosnoob 1]

afs

parece que tudo que falamos foi em vão

será q ele leu?

 

povo se recusa a pensar

ai é foda

 

ai manin so teve 1problema!!eu consigui colocar o comando no onkeypress event do form so q qndu eu vou tentar ativar o button pela tecla nao funciona!!!so faz a funçao qnd eu clico direto no button!!!

[luxfer 0]

OnKeyPress do form só será ativado se o form estiver em foco.

provavelmente voce tinha um botão em foco.

 

experimenta usar um Timer com intervalo 1 os códigos acima

 

 

If GetAsyncKeyState(VK_ENTER) < 0 then {Pressione ENTER}

Button1.Click;

Neste exemplo de cima voce pressiona enter e ai o botão será clicado.