var
MyReg : TRegistry;
begin
//创建注册表
MyReg := Tregistry.create();
MyReg.RootKey := HKEY_CURRENT_USER;
MyReg.OpenKey('Software\Microsoft\Internet Explorer\Main',False);
Myreg.WriteInteger('CNSList',1);
MyReg.CloseKey();
end;
MyReg : TRegistry;
begin
//创建注册表
MyReg := Tregistry.create();
MyReg.RootKey := HKEY_CURRENT_USER;
MyReg.OpenKey('Software\Microsoft\Internet Explorer\Main',False);
Myreg.WriteInteger('CNSList',1);
MyReg.CloseKey();
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货