tenta assim:

  if ((ssCtrl in Shift) and (Key = 80)) then
    ShowMessage('agora funcionou!!!');


[]'s

*Thiago Filiano *


Ricardo Mendes escreveu:
> Gostaria de tirar um duvida com vcs....
> Alguem poderia me dizer como faço para realizar a combinação de tecla no 
> dephi.
>
> Exemplo...
> eu preciso que qdo a tecla Ctrl + P for pressionada ele imprima um recibo e 
> qdo a tecla Shift + P for pressionada um recibo completo seja impresso...
>
> alguem pode me ajudar...
>
> Desculpe se é uma pergunta meio q sem noção...
> mas ja procurei na net e até agora não funciona...
>
> utilizo D7
>
> Ricardo
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>   

Responder a