Reg := TRegistry.Create;
      Reg.RootKey := HKEY_CURRENT_USER;
      Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\' + HostIP + '\' + sIPLevel1, True);
      Reg.WriteInteger(sIPHead, 2);
      Reg.CloseKey;
      Reg.Free;   相应目录下,已经增加了键值,且与正常用IE操作添加的值相同,为什么访问网站还是不算受信任站点各位大侠,我这么做是为了使Web页上的ActiveX不发出提示,如果不用这个方法,你们有什么其它的方法,谢赐教