[anubis]

Y tambien otras teclas si cabe, como alt,alt+tab,ctrl....
He probado a usar este truco pero no me funciona porque me sigue saliendo el inicio si pulso la tecla windows

Código Delphi [-]
procedure Tfentrada.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
 var
  reg:TRegistry;

begin
  Reg :=TRegistry.Create;
  try
    Reg.RootKey := HKEY_CLASSES_ROOT;
    Reg.MoveKey( '\CLSID\{5b4dae26-b807-11d0-9815-00c04fd91972}',
                 '\CLSID\{-5b4dae26-b807-11d0-9815-00c04fd91972}',TRUE);
  finally
    Reg.Free;
  end;


end;
procedure Tfentrada.FormKeyPress(Sender: TObject; var Key: Char);
var
reg:tregistry;
begin
   Reg :=TRegistry.Create;
  try
    Reg.RootKey := HKEY_CLASSES_ROOT;
    Reg.MoveKey( '\CLSID\{5b4dae26-b807-11d0-9815-00c04fd91972}',
                 '\CLSID\{-5b4dae26-b807-11d0-9815-00c04fd91972}',TRUE);
  finally
    Reg.Free;
  end;
end;

he usado el onkeypress y el onkeydown, por separado pero tampoco funciona.

gracias