Qual a diferen�a entre o OnKeyDown e o OnKeyPress??

Question

Pessoal desisto, � dias estou tentando obter uma resposta sobre um problema em minhas aplica��es om o evento OnKeyDown e o Setfocus.

Agora gostaria de saber qual a diferen�a entre o evento OnKeyDown e o OnKeyPress..

No OnKeyPress como eu faria para utilizar as constantes VK_F1, VK_F2 e assim por diante?

Grato

Fausto

Faustoalves · Accepted Answer

[quote:e09b72a70b=�Emerson.EN�]o OnKeyPress � utilizado para manipular o pressionamento de uma �nica tecla. [F2] por exemplo.o OnKeyDown serve para manipular o pressionamento de um conjunto de teclas....

Logado · Answer

Naum sei, mas creio eu q o OnKeyPress deve ser o evento acionando enquando se est� precionando a tecla(mantendo-a precionada) e onKeydown o evento de apertar a tecla s� com um toque normalmente...

Fabio.hc · Answer

Completando a informa��o.[b:31748c0515]OnKeyDown[/b:31748c0515]: ocorre quando o usu�rio pressiona uma tecla.Ex: Este edit exibir� o texto ap�s o caracter digitado quando o usu�rio pressionar qualquer tecla.[code:1:31748c0515]procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);begin   Edit1.Text:=�Uma tecla foi pressionada�;end;[/code:1:31748c0515][b:31748c0515]OnKeyPress[/b:31748c0515]: ocorre quando o usu�rio pressiona uma tecla que corresponda a um caracter ASCII.Ex: Este edit exibir� o texto ap�s o caracter digitado quando o usu�rio pressionar qualquer tecla ASCII.[code:1:31748c0515]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begin   Edit1.Text:=�Uma tecla ASCII foi pressionada�;end;[/code:1:31748c0515][b:31748c0515]OnKeyUp[/b:31748c0515]: ocorre quando o usu�rio solta uma tecla.Ex: Este edit exibir� o texto quando o usu�rio liberar uma tecla.[code:1:31748c0515]procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;  Shift: TShiftState);begin   Edit1.Text:=�Uma tecla foi solta�;end;[/code:1:31748c0515]...

Pantoja · Answer

me explica ai Fabio ...  me diz a diferen�a entre �uma tecla foi pressionada�  e  � Uma tecla ascii foi pressionada �...nao entendi !!! :lol:...

Fvilela · Answer

AE!!
E como eu fa�o para mostrar qual tecla foi pressionada passando o key como parametro;
ex.
if (ssCtrl in Shift) and (ssShift in Shift) then
begin
... Foi pressionado Ctrl + Shift + (A Key passada como parametro no
evento)
end;

Valew!!!!

Fernando

Fabio.hc · Answer

[quote:95fb4a44f7=�Professor Algoritmo�]me explica ai Fabio ... me diz a diferen�a entre �uma tecla foi pressionada� e � Uma tecla ascii foi pressionada �...

nao entendi !!! :lol:[/quote:95fb4a44f7]

Pega este exemplo que passei e testa um de cada vez, e pressiona as teclas e veja o resultado.
Ex:
OnKeyPress:
�F1� - n�o passa.
�A� - passa.

Fabio.hc · Answer

[quote:00b29da700=�fvilela�]AE!!  E como eu fa�o para mostrar qual tecla foi pressionada passando o key como parametro; ex.   if (ssCtrl in Shift) and (ssShift in Shift) then   begin    ... Foi pressionado Ctrl + Shift + (A Key passada como parametro no                                                      evento)   end;Valew!!!!Fernando[/quote:00b29da700]Ex: Para vc pegar Ctr+Shift+A[code:1:00b29da700]procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin   if (ssCtrl in Shift) and (ssShift in Shift) then      if key = 65 then         ShowMessage(�... Foi pressionado Ctrl + Shift + �+chr(65)+� (A Key passada como parametro no evento)�);end;[/code:1:00b29da700]Obs: O primeiro IF s� passa se for pressionado Ctrl + Shift, o segundo IF vc testa o Key que vc quer usar....