Tecla de Atalho

Delphi

03/03/2004

Gostaria de Saber como faço para pressionar, por exemplo, CTRL+ALT+A para chamar um form e se teria como executar este atalho de qualquer tela do sistema.

Agradeço desde já!!!


J.rondelli

J.rondelli

Curtidas 0

Respostas

Adriano Santos

Adriano Santos

03/03/2004

Faça isso:

Configure a propriedade KeyPreview do Form como True;

on evento onKeyDown escreva:

  if (Shift = [ssCtrl,ssAlt]) and (Key = 65 ) then
    showmessage(´ola´);


Para colocar na aplicação toda eu não sei...


GOSTEI 0
POSTAR