现在大家都用宽带拨号上网,如何编程实现更改拨号连接设置里的 代理?在ie中有两个代理设置的地方!一个是局域网设置!一个是拨号连接里的代理设置,如何实现拨号连接里的代理更改?请兄弟们指点!!!
解决方案 »
- 怎样循环播放资源声音 delphi
- 关于delphi中的package静态链接的问题,已经有bpl文件了,为什么编译的时候还要找package中相应的单元文件呢!
- 怎样将十六进制字符432D44转换为英文C-D?
- 请教一个关于Button和Groupbox的问题,在线等,谢谢!
- TVideoCap 2.3 摄像头控件使用的问题
- delphi6 能使用access2002数据库吗?
- Delphi6+SQL2000有什么好书介绍
- 在TShellListView中,怎样确定哪一个文件被选定,调用什么事件,是用什么方法?急急急。
- 怎么向数据大表中插入新字段.
- 继承的窗体不能执行线程的疑问
- 江湖救急!!!!关于全文检索引擎安装的问题
- 急啊,关于dbgrideh问题,谢谢各位了
去看看
然后SetInternetOption生效
Pinfo.dwAccessType:=INTERNET_OPEN_TYPE_PROXY; InternetSetOption(nil,INTERNET_OPTION_PROXY,@Pinfo,SizeOf(Pinfo));
InternetSetOption(nil,INTERNET_OPTION_SETTINGS_CHANGED,NIL,0);
.........
reg:=Tregistry.Create;
try if reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Internet Settings',true) then
begin
reg.WriteInteger('ProxyEnable',integer(true));
reg.WriteString('ProxyServer',FMProxy); end;
finally
reg.CloseKey;
reg.Free;
end; reg:=Tregistry.Create;
try
reg.RootKey:=HKEY_USERS ;
if reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Internet Settings',true) then
begin
reg.WriteInteger('ProxyEnable',integer(true));
reg.WriteString('ProxyServer',FMProxy);
end
finally
reg.CloseKey;
reg.Free;
end;
但是这样还是不能起作用!请您指点,nternetSetOption得参数还需要什么变化?