Foros Club Delphi - prohibe Control + alt + del

ola, estaba navegando por ahi y encontre un codigo para no admitir el tecleo de CONTROL + ALT + DEL y lo intente, si funciona pero el problema es ke no solo funciona en la aplicacion, sino ke hasta fuera de ella, incluso en el inicio de windows aunke no se haya ejecutado la aplicacion... hay alguna forma de revertirlo o quitarlo??

aka les dejo el codigo, pasara al clickear el boton:

Código:

unit Unit1;

 

 interface

 

 uses

   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

   Dialogs, registry, StdCtrls;

 

 type

   TForm1 = class(TForm)

         Button1: TButton;

         procedure Button1Click(Sender: TObject);

   private

         { Private declarations }

   public

         { Public declarations }

   end;

 

 var

   Form1: TForm1;

 

 implementation

 

 {$R *.dfm}

 

 procedure TForm1.Button1Click(Sender: TObject);

 procedure DisableTaskMgr(bTF: Boolean);

    var

          reg: TRegistry;

    begin

          reg := TRegistry.Create;

          reg.RootKey := HKEY_CURRENT_USER;

 

          reg.OpenKey('Software', True);

          reg.OpenKey('Microsoft', True);

          reg.OpenKey('Windows', True);

          reg.OpenKey('CurrentVersion', True);

          reg.OpenKey('Policies', True);

          reg.OpenKey('System', True);

 

          if bTF = True then

          begin

            reg.WriteString('DisableTaskMgr', '1');

          end

          else if bTF = False then

          begin

            reg.DeleteValue('DisableTaskMgr');

          end;

          reg.CloseKey;

    end;

 

  begin

    //Desabilitamos el Ctrl-Alt-Del

    //Disable Ctrl-Alt-Del

    DisableTaskMgr (True);

 end;

 

 end.

PD: es el codigo para ke el CONTROL + ALT + DEL no funcione