易语言设置IE代理上网工具源码

系统结构:代理列表线程,代理列表,保存代理列表,加载xml,设置IE代理,获取外网IP,InternetSetOptionA2,InternetSetOptionA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 代理列表线程
           |  |
           |  |------ 代理列表
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ 保存代理列表
           |  |
           |  |------ 加载xml
           |  |
           |  |------ 设置IE代理
           |  |
           |  |------ _设置代理_被选择
           |  |
           |  |------ _超级列表框1_右键单击表项
           |  |
           |  |------ _超级列表框1_被双击
           |  |
           |  |------ 获取外网IP
           |  |
           |  |------ _取消代理_被选择
           |  |
           |  |------ _刷新列表_被选择
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _超级列表框1_左键单击表项
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   InternetSetOptionA2
           |  |
           |  |---[dll]------   InternetSetOptionA

调用的DLL命令:

.DLL命令 InternetSetOptionA2, 逻辑型, "Wininet.dll", "InternetSetOptionA", 公开, 设置IE属性
    .参数 hInternet, 整数型
    .参数 dwOption, 整数型
    .参数 lpBuffer, INTERNET_PROXY_INFO
    .参数 dwBufferLength, 整数型

.DLL命令 InternetSetOptionA, 逻辑型, "Wininet.dll", "InternetSetOptionA", 公开, 改变IE
    .参数 hInternet, 整数型
    .参数 dwOption, 整数型
    .参数 lpBuffer, 整数型
    .参数 dwBufferLength, 整数型