流量监控器增强版易语言源码

系统结构:创建互斥体,子程序_窗口函数,计算流量,取信息记录,弹出提示,文本格式化,取指定内容,取网络信息,取得窗口信息_,呼叫窗口函数地址_,TrackMouseEvent,SetWindowLong,CreateMutex,OpenMutex,

======窗口程序集1
           |  |
           |  |------ 创建互斥体
           |  |
           |  |------ _透明标签1_鼠标位置被移动
           |  |
           |  |------ 子程序_窗口函数
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ 计算流量
           |  |
           |  |------ 取信息记录
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |------ _透明标签1_鼠标右键被按下
           |  |
           |  |------ _透明标签1_鼠标左键被按下
           |  |
           |  |------ _气球提示框1_自定义超链接被单击
           |  |
           |  |------ 弹出提示
           |  |
           |  |------ _气球提示框1_提示框即将隐藏
           |  |
           |  |------ 文本格式化
           |  |
           |  |------ 取指定内容
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _窗口1_鼠标左键被按下
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取网络信息
           |  |
           |  |---[dll]------   取得窗口信息_
           |  |
           |  |---[dll]------   呼叫窗口函数地址_
           |  |
           |  |---[dll]------   TrackMouseEvent
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CreateMutex
           |  |
           |  |---[dll]------   OpenMutex

调用的DLL命令:

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

.DLL命令 取得窗口信息_, 整数型, "user32", "GetWindowLongA", , 从指定窗口的结构中取得信息  由nIndex决定。零表示出错。会设置GetLastError
    .参数 窗口句柄, 整数型, , 欲为其获取信息的窗口的句柄
    .参数 属性, 整数型, , 欲取回的信息，可以是下述任何一个常数：;GWL_EXSTYLE：扩展窗口样式;GWL_STYLE：窗口样式;GWL_WNDPROC：该窗口的窗口函数的地址;GWL_HINSTANCE：拥有窗口的实例的句柄;GWL_HWNDPARENT：该窗口之父的句柄。不要用SetWindowWord来改变这个值;GWL_ID：对话框中一个子窗口的标识符;GWL_USERDATA：含义由应用程序规定;DWL_DLGPROC：这个窗口的对话框函数地址;DWL_MSGRESULT：在对话框函数中处理的一条消息返回的值;DWL_USER：含义由应用程序规定;

.DLL命令 呼叫窗口函数地址_, 整数型, "user32.dll", "CallWindowProcA", , 执行窗口过程
    .参数 前一窗口函数地址, 整数型
    .参数 窗口句柄, 整数型
    .参数 消息值, 整数型
    .参数 附加参数1, 整数型
    .参数 附加参数2, 整数型

.DLL命令 TrackMouseEvent, 整数型, "user32.dll", "TrackMouseEvent", , 跟踪指定区域鼠标状态
    .参数 lpEventTrack, TRACKMOUSEEVENT

.DLL命令 SetWindowLong, 整数型, "user32", "SetWindowLongA", 公开, 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 窗口句柄, 整数型, , hwnd，欲为其取得信息的窗口的句柄
    .参数 窗口信息值, 整数型, , nIndex，请参考GetWindowLong函数的nIndex参数的说明
    .参数 窗口信息新值, 子程序指针, , dwNewLong，由nIndex指定的窗口信息的新值

.DLL命令 CreateMutex, 整数型, "kernel32.dll", "CreateMutexA"
    .参数 lpMutexAttributes, SECURITY_ATTRIBUTES
    .参数 bInitialOwner, 整数型
    .参数 lpName, 文本型

.DLL命令 OpenMutex, 整数型, "kernel32.dll", "OpenMutexA"
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 lpName, 文本型