Dicas - Teclas do Windows

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (1)  (0)

Esta dica ensina como travar as teclas de atalhos do Windows.

Como travar as teclas de atalho do Windows

 

Esta dica ensina como travar as teclas de atalhos do windows, tais como, ALT + TAB, CTRL + ALT + DEL, tecla Win95 e seus atalhos, mesmo depois de sua aplicação estar fechada. O código abaixo mostra como fazer isto.

 

 

// Para desabilitar os atalhos.

procedure TForm1.Button1Click(Sender: TObject);

var

  Dummy: Integer;

begin

  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @Dummy, 0);

  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @Dummy, 0);

end;

 

/Para habilitar os atalhos.

procedure TForm1.Button2Click(Sender: TObject);

var

  Dummy: Integer;

begin

  SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, @Dummy, 0);

  SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, @Dummy, 0);

end;

 

Com esta técnica, você poderá evitar que usuário faça algo que você não deseja, por exemplo utilizar a tecla de atalho (Alt + Tab) para trocar de aplicação, entre outras coisas ...

 

Por Marco Antonio

marco@clubedelphi.net

 

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Ficou com alguma dúvida?