Fórum ShortCut de TActionList #367938

26/01/2009

0

Pessoal,

Alguém sabe como faz para colocar a propriedade Shortcut de um item do TActionList para responder quando pressionar a tecla ´+´?
Exemplo: ao pressionar a tecla ´+´ do teclado numérico, executa determinada ação.

abs.


Rtava

Rtava

Responder

Posts

28/01/2009

Woinch

Se for quando o form estiver ativo você pode ativar a propriedade KeyPreview do Form e no evento OnKeyPress do Form você pode fazer o seguinte:

  if Key = ´+´ then
    NomeDaProcedure;


Agora se você quiser fazer isso a nível de Windows e/ou sistema é mais complicado. Experimente pesquisar por ´keyboard + global + hook + delphi´ (sem aspas) no Google que você achará diversas soluções para isso.

Espero ter ajudado...


Responder

Gostei + 0

28/01/2009

Rtava

Woinch,
Fazer o controle por meio de eventos de pressionamento de tecla não tem problema. Eu poderia inclusive colocar um objeto TApplicationEvents para ficar monitorando tudo. Porém o que preciso é saber como ativar uma ação de um item do TActionList, usando a tecla ´+´. Por isso perguntei como se ativa o ´+´ no ShortCut.

obrigado


Responder

Gostei + 0

28/01/2009

Woinch

Então infelizmente não posso lhe ajudar. Só mencionei uma outra maneira que poderia utilizar para chamar a ação sempre que pressionasse a tecla ´+´.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar