水淼自绘进度条v1.21易语言源码

系统结构:取类方法指针,线程_启动1,线程_销毁,填充指定宽度,置位置,置位置2,循环线程,移动,取位置,初始化,重新初始化,重置,置速度,取速度,等待完成,顶边,左边,宽度,高度,

======启动
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 取类方法指针
           |  |
           |  |------ 线程_启动1
           |  |
           |  |------ 线程_销毁
           |  |
           |  |
======窗口程序集
           |  |
           |  |------ _窗口_创建完毕
           |  |
           |  |------ _窗口_尺寸被改变
           |  |
           |  |------ _按钮循环_被单击
           |  |
           |  |------ _编辑框1_内容被改变
           |  |
           |  |------ _画板_鼠标左键被按下
           |  |
           |  |------ _画板1_鼠标左键被按下
           |  |
           |  |------ _画板2_鼠标左键被按下
           |  |
           |  |------ _画板_鼠标右键被按下
           |  |
           |  |------ _画板1_鼠标右键被按下
           |  |
           |  |------ _画板2_鼠标右键被按下
           |  |
           |  |
======水淼自绘进度条
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 填充指定宽度
           |  |
           |  |------ 置位置
           |  |
           |  |------ 置位置2
           |  |
           |  |------ 循环线程
           |  |
           |  |------ 移动
           |  |
           |  |------ 取位置
           |  |
           |  |------ 初始化
           |  |
           |  |------ 重新初始化
           |  |
           |  |------ 重置
           |  |
           |  |------ 置速度
           |  |
           |  |------ 取速度
           |  |
           |  |------ 等待完成
           |  |
           |  |------ 顶边
           |  |
           |  |------ 左边
           |  |
           |  |------ 宽度
           |  |
           |  |------ 高度
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _HeapAlloc
           |  |
           |  |---[dll]------   _CreateThread1
           |  |
           |  |---[dll]------   _GetProcessHeap
           |  |
           |  |---[dll]------   _GetExitCodeThread
           |  |
           |  |---[dll]------   _TerminateThread

调用的DLL命令:

.DLL命令 _HeapAlloc, 整数型, "kernel32", "HeapAlloc", 公开, 从堆栈分配内存
    .参数 堆栈句柄, 整数型, , hHeap
    .参数 标志, 整数型, , dwFlags
    .参数 分配大小, 整数型, , dwBytes

.DLL命令 _CreateThread1, 整数型, , "CreateThread", 公开, 创建并打开一个线程
    .参数 lpThreadAttributes, 整数型
    .参数 dwStackSize, 整数型
    .参数 lpStartAddress, 整数型
    .参数 lpParameter, 整数型
    .参数 dwCreationFlags, 整数型, , 控制线程创建的标志。如果指定了CREATE_SUSPENDED标志，是创建线程处于暂停状态，并不会运行，直到ResumeThread函数被调用。如果这个值是零，线程创建后立即运行
    .参数 lpThreadId, 整数型, 传址

.DLL命令 _GetProcessHeap, 整数型, "kernel32", "GetProcessHeap", 公开, _取进程堆栈句柄, 获取调用过程堆句柄

.DLL命令 _GetExitCodeThread, 整数型, "kernel32", "GetExitCodeThread", 公开, _取中止线程退出代码
    .参数 线程句柄, 整数型
    .参数 退出代码, 整数型, 传址

.DLL命令 _TerminateThread, 逻辑型, "Kernel32.dll", "TerminateThread"
    .参数 hThread, 整数型, , 线程句柄
    .参数 dwExitCode, 整数型, , 填0