win8流量统计易语言源码

系统结构:计算流量,取信息记录,设置透明,取窗口风格,设置窗口,发送消息_,取网络信息,API_GetActiveWindow,SetCapture,ReleaseCapture,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |
======窗口程序3
           |  |
           |  |------ _流量_创建完毕
           |  |
           |  |------ 计算流量
           |  |
           |  |------ _时钟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"