易语言取相似颜色源码

系统结构:取差异度,取近似颜色索引,BitBlt,GetDC,ReleaseDC,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ __启动窗口_首次激活
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ 取差异度
           |  |
           |  |------ 取近似颜色索引
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   ReleaseDC

调用的DLL命令:

.DLL命令 BitBlt, 整数型, "gdi32", "BitBlt", , 将一幅位图从一个设备场景复制到另一个。源和目标DC相互间必须兼容  非零表示成功，零表示失败。会设置GetLastError
    .参数 hDestDC, 整数型, , 目标设备场景
    .参数 x, 整数型, , 对目标DC中目标矩形左上角位置进行描述的那个点。用目标DC的逻辑坐标表示
    .参数 y, 整数型, , 同上
    .参数 nWidth, 整数型, , 欲传输图象的宽度和高度
    .参数 nHeight, 整数型, , 同上
    .参数 hSrcDC, 整数型, , 源设备场景。如光栅运算未指定源，则应设为0
    .参数 xSrc, 整数型, , 对源DC中源矩形左上角位置进行描述的那个点。用源DC的逻辑坐标表示
    .参数 ySrc, 整数型, , 同上
    .参数 dwRop, 整数型, , 传输过程要执行的光栅运算;

.DLL命令 GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景  指定窗口的设备场景句柄，出错则为0
    .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;

.DLL命令 ReleaseDC, , , "ReleaseDC"
    .参数 hwnd, 整数型, , 要释放的设备场景相关的窗口句柄
    .参数 hdc, 整数型, , 要释放的设备场景句柄