delphi 修改注册表的问题
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;
Info.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
Info.lpszProxy := PChar('60.254.188.10:80');
InternetSetOption(nil, INTERNET_OPTION_PROXY, @Info, 1000);
InternetSetOption(nil, INTERNET_OPTION_REFRESH, nil, 0);
InternetSetOption(nil, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
webbrowser1.Navigate('http://www.ip138.com');
end;
我试图修改
HKEY_US
相关问答：
delphi如何向Access数据表中自定义字段?然后显示到DBGrid中
怎么没人理我呀
分分忒少咧，一般人都懒得进来……*^_^*
SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))
ADOQue ......
delphi内置的加密解密单元是哪个？
Delphi有内置加密解密单元？
delphi里有个加密和解密的单元
引用
delphi里有个加密和解密的单元
是哪个？
windows的api？
标准加密的源代码，网上 ......
我安装的是企业版。。。
我问下， CTRL+左键 能查看 windows.pas 吗？
就是 接口里的windows。
当然可以,CTRL+左键点击Interface部分的Windows就可以了
啥啥企业版？去安装目录看看lib文件夹下有没� ......
嘿嘿，又来麻烦各位大牛了！我想了解我在代码的事件属性里面看不到有什么事件，还有在时间控件里面的Enabled的属性是False，这下蒙了，不知道程序运行之后执行的是那条命令，希望各位大牛赐教啦！
谢谢！
我这下 ......
