易语言VPN源码

系统结构:可以,设置透明,取窗口风格,设置窗口,发送消息_,取网络信息,API_GetActiveWindow,SetCapture,ReleaseCapture,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _按钮6_被单击
           |  |
           |  |------ 可以
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ _程序更新update_被选择
           |  |
           |  |------ _退出End_被选择
           |  |
           |  |------ _最小化窗口托盘Hide_被选择
           |  |
           |  |------ _退出程序End_被选择
           |  |
           |  |------ _作者的微博sinaWeiBo_被选择
           |  |
           |  |------ _显示程序Display_被选择
           |  |
           |  |------ _隐藏程序Hide_被选择
           |  |
           |  |------ _作者微博SinaWeibo_被选择
           |  |
           |  |
======窗口程序3
           |  |
           |  |------ _前面_创建完毕
           |  |
           |  |------ _前面_将被销毁
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _透明标签5_鼠标左键被按下
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _透明标签8_鼠标左键被按下
           |  |
           |  |------ _透明标签6_鼠标左键被按下
           |  |
           |  |------ _超文本浏览框1_载入完毕
           |  |
           |  |------ _透明标签7_鼠标左键被按下
           |  |
           |  |------ _超文本浏览框1_载入进度改变
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _透明标签10_鼠标左键被按下
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _按钮5_被单击
           |  |
           |  |------ _按钮6_被单击
           |  |
           |  |------ _按钮8_被单击
           |  |
           |  |------ _按钮7_被单击
           |  |
           |  |------ _按钮10_被单击
           |  |
           |  |------ _按钮11_被单击
           |  |
           |  |------ _按钮12_被单击
           |  |
           |  |------ _按钮14_被单击
           |  |
           |  |------ _按钮13_被单击
           |  |
           |  |------ _按钮9_被单击
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _窗口1_将被销毁
           |  |
           |  |
======窗口程序集3
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _窗口1_将被销毁
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置透明
           |  |
           |  |---[dll]------   取窗口风格
           |  |
           |  |---[dll]------   设置窗口
           |  |
           |  |---[dll]------   发送消息_
           |  |
           |  |---[dll]------   取网络信息
           |  |
           |  |---[dll]------   API_GetActiveWindow
           |  |
           |  |---[dll]------   SetCapture
           |  |
           |  |---[dll]------   ReleaseCapture

调用的DLL命令:

.DLL命令 设置透明, 整数型, , "SetLayeredWindowAttributes"
    .参数 hwnd, 整数型
    .参数 crkey, 整数型
    .参数 alpha, 字节型
    .参数 dwflags, 整数型

.DLL命令 取窗口风格, 整数型, , "GetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型

.DLL命令 设置窗口, 整数型, , "SetWindowLongA"
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong

.DLL命令 发送消息_, 整数型, "user32", "SendMessageA", , , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式  由具体的消息决定
    .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
    .参数 信息值, 整数型, , 消息的标识符
    .参数 参数一, 逻辑型, , 具体取决于消息
    .参数 参数二, 整数型, , 具体取决于消息;

.DLL命令 取网络信息, 整数型, "iphlpapi", "GetIfTable"
    .参数 信息表, 字节集, 传址
    .参数 信息表尺寸, 整数型, 传址
    .参数 内参数, 整数型

.DLL命令 API_GetActiveWindow, 整数型, "user32", "GetActiveWindow"

.DLL命令 SetCapture, 整数型, , "SetCapture"
    .参数 Hwnd, 整数型

.DLL命令 ReleaseCapture, 整数型, , "ReleaseCapture"