copy
//禁止使用注册表
procedure TForm1.Button1Click(Sender: TObject);
const
  Key='\SoftWare\Microsoft\Windows\CurrentVersion\Policies\System';
var
  myReg:TRegistry;
begin
  myReg:=TRegistry.Create;
  with myReg do
 try
    RootKey:=HKEY_CURRENT_USER;
    OpenKey(Key,True);
    WriteInteger('DisableRegistryTools',1);
    finally
    free;
  end;
end;
//允许使用注册表
procedure TForm1.Button2Click(Sender: TObject);
const
  Key='\SoftWare\Microsoft\Windows\CurrentVersion\Policies\System';
var
  myReg:TRegistry;
begin
  myReg:=TRegistry.Create;
  with myReg do
 try
    RootKey:=HKEY_CURRENT_USER;
    OpenKey(Key,True);
    WriteInteger('DisableRegistryTools',0);
    finally
    free;
  end;
end;

解决方案 »

  1.   

    禁止IE显示“工具”中“INTERNET选项”在[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]下,在右边的窗口中新建一个二进制值“NoFolderOptions”,并设值为“01 00 00 00”(或者双字节dword值 1,因为好象win9x和2000不同)。 禁止更改IE的辅助功能设置在[HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel]下在右边的窗口中新建一个DWORD值“Accessibility”,并设值为 1。 禁止更改IE的连接设置在[HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel]下在右边的窗口中新建一个DWORD值“Connection Settings”,并设值为“1”。禁止更改IE的语言设置在[HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel]下在右边的窗口中新建一个DWORD值“Languages”,并设值为“1”。  要解禁,只要将相应的值改为 0。或者删除相应的键值。