Criar Tecla de Atalho F2, F3, F4...

Delphi

18/05/2006

Olá Pessoal!

No meu sistema tenho uma tela de cadastro com uma toolbar e preciso criar teclas de atalho para acessar os seus botões.
Se tento usar o ´ALT + alguma coisa´ estarei acessando o menu do meu form principal. Então minha idéia seria usar as teclas de função (F2, F3, F4...)
Como faço isso? Alguém poderia me dar uma dica?
Estou usando Delphi 7...

Obrigado!


Tomew

Tomew

Curtidas 0

Melhor post

Martins

Martins

18/05/2006

Olá Pessoal! No meu sistema tenho uma tela de cadastro com uma toolbar e preciso criar teclas de atalho para acessar os seus botões. Se tento usar o ´ALT + alguma coisa´ estarei acessando o menu do meu form principal. Então minha idéia seria usar as teclas de função (F2, F3, F4...) Como faço isso? Alguém poderia me dar uma dica? Estou usando Delphi 7... Obrigado!


Não sei se já lhe responderam, mas vc pode usar a estrutura abaixo e adaptar para sua necessidade.

Inclua esse código no OnKeyDown do FORM.
 case key of
   vk_f2: ShowMessage(´Teclou F2..´);
   vk_f3: ShowMessage(´Teclou F3..´);
   vk_f4: ShowMessage(´Teclou F4..´);
   vk_f5: ShowMessage(´Teclou F5..´);
 end;


Lembre-se de passar KeyPreview para true.

Boa sorte e bons códigos!


GOSTEI 1

Mais Respostas

Erileyvb

Erileyvb

18/05/2006

mude a propriedade do formulario keypreview para true.
no evento on keydown faça o teste, como por exemplo:
if key = vk_f2 then
begin
ToolButton1Click(self);
end;
ToolButton1Click(self); apenas chama o evento de clicar no botão cujo name é ToolButton1 da ToolBar.
Atenção se o name de seus ToolButton´s for diferente, substitua pelo name corespondente.
Espero ter ajudado.
Atenciosamente
Eriley


GOSTEI 1
Tomew

Tomew

18/05/2006

Muito obrigado!
Funcionou perfeitamente.


GOSTEI 0
Martins

Martins

18/05/2006

Muito obrigado! Funcionou perfeitamente.

:D

É sempre um prazer ajudar os colegas do fórum, sucesso em seus códigos.

[]´s


GOSTEI 0
Daia

Daia

18/05/2006

tentei fazer, mas p mim não funcionou da erro em ´vk_f2´... é preciso declarar alguma coisa no Uses...??
Obrigada!


GOSTEI 0
Gabriel

Gabriel

18/05/2006

Cara muito Obrigado esclareceu minha duvida. Vlw
GOSTEI 0
Meks

Meks

18/05/2006

Eu concordo completamente com você, eu também ajudei muito)
http://www.deviceranking.pt/smartwatch/9527/no.1-f4
GOSTEI 0
POSTAR