Fórum loucura com atalhos de botões #266132
20/01/2005
0
Estou com o seguinte problema se tenho botões com o caption definidos como &Cancelar, &Salvar, &Excluir, &Incluir
Ao pressionar a Letra que sucede ao & o sistema o executa sem ser necessário pressionar a tecla ALT, Ex.: se pressionar a tecla C é executado o evento onclick do botão com o caption = &Cancelar
Desde já agradeço pela atenção
Steve_narancic
Curtir tópico
+ 0Posts
20/01/2005
Reginaldo174
Case key of
67 : Botao_Cancelar.click;
83 : Botao_Salvar.click;
69 : Botao_Excluir.click;
73 : Botao_Incluir.click;
end;
mude a propriedade Keypreview para true.
Gostei + 0
20/01/2005
Steve_narancic
Gostei + 0
20/01/2005
Eixox
Gostei + 0
20/01/2005
Steve_narancic
mas por acaso existe como desativar este recurso.
Gostei + 0
20/01/2005
Paulo_amorim
Pode-se tentar...
Coloque KeyPreview do Form para true
No OnKeyDown, existe o parâmetro Shift
Teste se:
-Ele apertou uma letra do alfabeto: in [´A´..´Z´]
-O foco não está em um Edit, Memo ou o que vc tiver na tela
-O Alt não está apertado not(ssAlt in Shift)
Se satisfizer tudo isso, Key := 0;
Espero que ajude
Até+
Gostei + 0
20/01/2005
Steve_narancic
não sei como não tinha pensado nisto antes, muito obrigado pelas dicas
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)