ShortCut de TActionList
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.
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
Curtidas 0
Respostas
Woinch
26/01/2009
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:
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...
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...
GOSTEI 0
Rtava
26/01/2009
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
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
GOSTEI 0
Woinch
26/01/2009
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 ´+´.
GOSTEI 0