置显示设备灰度斜坡

系统结构:子程序_转换整数,子程序_转换短整数,取设备灰度斜坡_,置设备灰度斜坡_,取设备场景_,释放设备场景_,

======窗口程序集_启动窗口
           |  |
           |  |------ _按钮_运行_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 子程序_转换整数
           |  |
           |  |------ 子程序_转换短整数
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取设备灰度斜坡_
           |  |
           |  |---[dll]------   置设备灰度斜坡_
           |  |
           |  |---[dll]------   取设备场景_
           |  |
           |  |---[dll]------   释放设备场景_

调用的DLL命令:

.DLL命令 取设备灰度斜坡_, 整数型, "gdi32.dll", "GetDeviceGammaRamp", , $(b)获取显示器的辉度系数
    .参数 设备场景句柄, 整数型, , hdc
    .参数 结构缓冲区地址, 短整数型, 传址, lpv

.DLL命令 置设备灰度斜坡_, 整数型, "gdi32.dll", "SetDeviceGammaRamp", , $(b)设置辉等级
    .参数 设备场景句柄, 整数型, , hdc
    .参数 结构缓冲区地址, 短整数型, 传址, lpv

.DLL命令 取设备场景_, 整数型, "User32.dll", "GetDC", , $(b)
    .参数 设备场景

.DLL命令 释放设备场景_, 整数型, "user32", "ReleaseDC", , $(b)
    .参数 窗口句柄, 整数型
    .参数 设备场景, 整数型