Evento de teclado

Question

Preciso gerar um evento em um form que, seja qual for o campo de edi��o, contido no form, ao teclar [Alt]+[A], forne�a o caractere ��� � entrada; ao teclar [Alt]+[O], forne�a o caractere ���.  Como po...

Aroldo Zanela · Answer

[quote:e716f1a5fc=�PedroCampos�]Preciso gerar um evento em um form que, seja qual for o campo de edi��o, contido no form, ao teclar [Alt]+[A], forne�a o caractere ��� � entrada; ao teclar [Alt]+[O], forne�a o caractere ���.  Como posso fazer isto?OBS: j� tentei manipular o evento OnKeyDown da form, mas n�o surtiu efeito e as combina��es acima n�o geram um char para o evento OnKeyPress[/quote:e716f1a5fc]No form coloque o tratamento no OnKeyPress e mude a propriedade [b:e716f1a5fc]KeyPreview para true.[/b:e716f1a5fc][code:1:e716f1a5fc]procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);beginif Key = �A� then Key := �B�;end;[/code:1:e716f1a5fc]...

Anonymous · Answer

Conforme escrevi na minha mensagem original, as combina��es [Alt]+[letra/numero] n�o geram o evento OnKeyPress, pois n�o geram um char ASCII direto. Tentei usar [Ctrl+A] e [Ctrl+O] no evento OnKeyPress, funcionou direito, exceto para os objetos TMemo e TRichEdit, onde a combina��o [Ctrl+A] apaga todo o texto digitado antes de gerar o evento. N�o quero desativar caracteres validos, pois acho deselegante e pouco intuitivo para o usu�rio. Gostaria de usar as combina��es [Alt+A] para o caractere � e [Alt+O] para o caractere �, e creio que s� vou conseguir isto manipulando o evento OnKeyDown, s� que n�o consegui faz�-lo; por isto, estou escrevendo para c�.

Pedro Campos
Rio de Janeiro, RJ

Aroldo Zanela · Answer

[quote:6affc1ff1a=�PedroCampos�]Conforme escrevi na minha mensagem original, as combina��es [Alt]+[letra/numero] n�o geram o evento OnKeyPress, pois n�o geram um char ASCII direto.  Tentei usar [Ctrl+A] e [Ctrl+O] no evento OnKeyPress, funcionou direito, exceto para os objetos TMemo e TRichEdit, onde a combina��o [Ctrl+A] apaga todo o texto digitado antes de gerar o evento.  N�o quero desativar caracteres validos, pois acho deselegante e pouco intuitivo para o usu�rio.  Gostaria de usar as combina��es [Alt+A] para o caractere � e [Alt+O] para o caractere �, e creio que s� vou conseguir isto manipulando o evento OnKeyDown, s� que n�o consegui faz�-lo; por isto, estou escrevendo para c�.Pedro CamposRio de Janeiro, RJ[/quote:6affc1ff1a]Caro Pedro,Minha sugest�o � utilizar uma vari�vel Private de comprimento de 2 para servir de �pilha� para entrada de dados e quando tiver uma combina��o _a, _A, _o, _O, fa�a a convers�o. Parece simples, mas vai ter que escrever um pouco....

Aroldo Zanela · Answer

[quote:e99b98a2d6]Minha sugest�o � utilizar uma vari�vel Private de comprimento de 2 para servir de �pilha� para entrada de dados e quando tiver uma combina��o _a, _A, _o, _O, fa�a a convers�o. Parece simples, mas vai ter que escrever um pouco.[/quote:e99b98a2d6]Desculpe, onde se l�: �pilha�leia-se: �fila�...

Anonymous · Answer

Valeu, meu caro Aroldo Zanela.Pedro CamposRio de Janeiro, RJ...