Como saber o caracter pelo valor da VK Shift ?

Question

Pessoal, tenho duas informa��es:1-Valor da VK(Virtual Key) - Ex: 542-Shift pressionada - Ex: SimA partir da� tenho que retornar o caracter do teclado.No exemplo acima citado, o usu�rio digitou Shift 6...

Martins · Answer

[quote:0b53aa93ce=�siam�]Pessoal, tenho duas informa��es:1-Valor da VK(Virtual Key) - Ex: 542-Shift pressionada - Ex: SimA partir da� tenho que retornar o caracter do teclado.No exemplo acima citado, o usu�rio digitou Shift 6.Como posso retornar o caracter correspondente?Alguma id�ia ?[/quote:0b53aa93ce]Ainda n�o entendi o q vc deseja, mas lembres-se q para o teclado n�merio a teclas n�mericas tem um valor, para o teclado alfa-numerico o valor das teclas de 1..0 s�o outros.o 6 por exemplo no teclado alfa-numerico tem valor: 54 no teclado numerico tem valor:  102.Vc deseja saber o caractere correspondente a uma tecla tipo o codigo Ascci, valor decimal, Hexadecimal, combina��o de teclas?...

Siam · Answer

Por exemplo: suponha o evento onKeyDown.
O valor da Key � 50
O Shift est� [ssShift]

Logo o usu�rio teclou Shift 2 no teclado alpha.
Isso resulta no caracter �@�.

S� que eu n�o tenho o evento onKeyPress que j� me retornaria o caracter. S� tenho a informa��o como no evento onKeyDown e apartir dela preciso retornar o caracter correspondente daquele teclado.

Como existem teclados diferentes, gostaria de saber se existe via c�digo algum meio de fazer isso.

Martins · Answer

J� tentou usar Chr(Key);...

Siam · Answer

[quote:3ae025f9c0=�Martins�]J� tentou usar Chr(Key);[/quote:3ae025f9c0]O valor da VK n�o muda; Chr(50) retorna sempre �2� mesmo com o Shift pressionado....

Martins · Answer

[quote:18b2bfe34c=�siam�][quote:18b2bfe34c=�Martins�]J� tentou usar Chr(Key);[/quote:18b2bfe34c]O valor da VK n�o muda; Chr(50) retorna sempre �2� mesmo com o Shift pressionado.[/quote:18b2bfe34c]Verei isso para vc em casa, depois posto aqui, estou no cyber agora, sem Delphi....

F�rum Como saber o caracter pelo valor da VK Shift ? #334452