Criar Tecla de Atalho F2, F3, F4...
18/05/2006
0
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
Post mais votado
18/05/2006
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!
Martins
Mais Posts
18/05/2006
Erileyvb
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
18/05/2006
Martins
:D
É sempre um prazer ajudar os colegas do fórum, sucesso em seus códigos.
[]´s
12/04/2007
Daia
Obrigada!
11/02/2018
Meks
http://www.deviceranking.pt/smartwatch/9527/no.1-f4
Clique aqui para fazer login e interagir na Comunidade :)