Teclas de função(F1, F2, F3,etc.).Como usar?

Delphi

07/05/2004

Qual a rotina utilizada para usar as teclas de Função?


Rodolfo

Rodolfo

Curtidas 0

Respostas

Fer_nanda

Fer_nanda

07/05/2004

Não sei se entendi direito, mas acho q é isso q procura.
Na propriedade keypreview do form deixe true.
Se vc quer q um tal form abra qdo prescionado o F2 (po exemplo) vc coloca no onkeydown do form

if key = vk_F2 then

//abra seu form..ou executa alguma rotina...

Espero ter ajudado


GOSTEI 0
Comodelphi

Comodelphi

07/05/2004

Mude a propriedade KeyPreview do seu form para true, no evento OnKeyDown do form teste o parametro Key para saber qual tecla foi pressionada. Use as constantes pre definiadas na unit windows.

Ex.: tecla f1 = VK_F1


GOSTEI 0
Fabio.hc

Fabio.hc

07/05/2004

Tente assim:
procedure Tform1.FormKeyDown(Sender:TObject; var Key: Word; Shift: TShifState);
begin
   case key of
   vk_F1: begin
             { instrucoes a serem executadas }
              end;
   vk_F2: begin
             { instrucoes a serem executadas }
              end;
   vk_F3: begin
             { instrucoes a serem executadas }
              end;
   end;
end;


Não se esqueça de colocar a propriedade ´KeyPreview´ do formulário em ´True´.

Você também pode usar as variáveis VK_F1 até VK_F12 referentes as outras teclas de função.


GOSTEI 0
POSTAR