Eu faço o seguinte macete, coloco um Pop-up Menu no form, crio o atalho que preciso, e na procedure de execução faço o que desejo.
Bruno Lepesqueur J. Ribeiro escreveu: > > Boa tarde pessoal! > > Estou precisando fazer um código aki, mas não tenho nem idéia de como > fazer! > > Seguinte... eu uso o código no OnKeyPress de um campo dbEdit: > > if key= #13 then > begin > Perform (CM_DialogKey, VK_TAB, 0); > key:=#0; > end; > > Pra quem não sabe esse código faz a tecla ENTER ter a mesma função que a > tecla TAB. > Na verdade eu gostaria de algo parecido! Vou explicar pra vcs abaixo: > > Eu gostaria que fosse executado um comando todas as vezes que alguém > pressionasse qq tecla do teclado no campo Edit4, exemplo: > > If (pressionar qualquer tecla) then > dbEdit5.setFocus; > > Agradeço a ajuda de todos! > > Obrigado! > > [As partes desta mensagem que não continham texto foram removidas] > > > > __________ Information from ESET NOD32 Antivirus, version of virus > signature database 3658 (20081202) __________ > > The message was checked by ESET NOD32 Antivirus. > > http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]