易语言GDI绘制进度条源码

系统结构:进度条,InvalidateRect,ValidateRect,BeginPaint,SaveDC,RestoreDC,

======窗口程序集1
           |  |
           |  |------ __启动窗口_鼠标左键被按下
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ __启动窗口_鼠标位置被移动
           |  |
           |  |------ __启动窗口_鼠标左键被放开
           |  |
           |  |------ __启动窗口_鼠标右键被按下
           |  |
           |  |------ __启动窗口_鼠标右键被放开
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 进度条
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   InvalidateRect
           |  |
           |  |---[dll]------   ValidateRect
           |  |
           |  |---[dll]------   BeginPaint
           |  |
           |  |---[dll]------   SaveDC
           |  |
           |  |---[dll]------   RestoreDC

调用的DLL命令:

.DLL命令 InvalidateRect, 整数型, "user32.dll", "InvalidateRect", , , 这个函数屏蔽一个窗口客户区的全部或部分区域
    .参数 窗口句柄, 整数型, , hwnd,待屏蔽窗口的句柄
    .参数 屏蔽矩形, 矩形_, , lpRect,用于描述待屏蔽矩形部分的一个矩形结构
    .参数 重画前删除, 整数型, , bErase,TRUE（非零）导致指定的区域在重画前先删除

.DLL命令 ValidateRect, , , "ValidateRect"
    .参数 hwnd
    .参数 rect

.DLL命令 BeginPaint, 整数型, , "BeginPaint", 公开
    .参数 h
    .参数 l, PAINTSTRUCT

.DLL命令 SaveDC, 整数型, "gdi32", "SaveDC"
    .参数 hdc

.DLL命令 RestoreDC, 整数型, , "RestoreDC"
    .参数 hdc
    .参数 dc