delphi如何修改注册表这一项 希望高手老师们们帮忙看看

procedure TForm1.Button1Click(Sender: TObject);
var
      Info: INTERNET_PROXY_INFO;
      Reg : TRegistry;    begin
     Reg := TRegistry.Create;
    try
     Reg.RootKey := HKEY_USERS;
     if Reg.OpenKey('\S-1-5-21-515967899-839522115-1343024091-1003\Software\Microsoft\Windows\CurrentVersion\Internet Settings', False) then
     begin
        Reg.WriteString('ProxyServer', '60.254.188.10:80');
       Reg.WriteInteger('ProxyEnable', 1);
             end;
     finally
       Reg.CloseKey;
       Reg.Free;
    end;高手们看好是注册表HKEY_USERS下创建新子项目 但是可能是权限的问题
创建不了 我的问题就是怎么在HKEY_USERS提权 或者有权限在HKEY_USERS下创建项目