Bloquear Atalhos do Windows (Windows E)

Delphi

08/01/2007

Alguém sabe como bloquear, através do Delphi, que o usuários acesse o Windows Explorer pelo teclado (teclas Windows+E)?

Obrigado.


Armindo

Armindo

Curtidas 0

Respostas

Scotchtriplo

Scotchtriplo

08/01/2007

Tenta isso. coloque o propriedade do Form KeyPreview = True.

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key = VK_LWIN then
begin
BlockInput(True);
Timer1.Enabled:=True;
end;
if Key = VK_RWIN then
begin
BlockInput(True);
Timer1.Enabled:=True;
end;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
BlockInput(False);
Timer1.Enabled:=False;
end;


GOSTEI 0
POSTAR