易语言手动绘制进度条源码

系统结构:绘制进度条,BitBlt,CreateCompatibleDC,GetDC,SelectObject,ReleaseDC,DeleteDC,InvalidateRect,UpdateWindow,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 绘制进度条
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   InvalidateRect
           |  |
           |  |---[dll]------   UpdateWindow

调用的DLL命令:

.DLL命令 BitBlt, 逻辑型
    .参数 hDestDC, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hSrcDC, 整数型
    .参数 xSrc, 整数型
    .参数 ySrc, 整数型
    .参数 dwRop, 整数型

.DLL命令 CreateCompatibleDC, 整数型
    .参数 hDC, 整数型

.DLL命令 GetDC, 整数型
    .参数 hWnd, 整数型

.DLL命令 SelectObject, 整数型
    .参数 hDC, 整数型
    .参数 hObject, 整数型

.DLL命令 ReleaseDC, 整数型
    .参数 hWnd, 整数型
    .参数 hDC, 整数型

.DLL命令 DeleteDC, 整数型
    .参数 hDC, 整数型

.DLL命令 InvalidateRect, 整数型
    .参数 hWnd, 整数型
    .参数 lpRect, RECT
    .参数 bErase, 逻辑型

.DLL命令 UpdateWindow, 整数型
    .参数 hWnd, 整数型