易语言取显示器信息源码

系统结构:子程序_枚举注册表,子程序_读取EDID信息,子程序_十进制转二进制,子程序_取长宽比,RegEnumKey,RegCreateKey,RegCloseKey,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 子程序_枚举注册表
           |  |
           |  |------ 子程序_读取EDID信息
           |  |
           |  |------ 子程序_十进制转二进制
           |  |
           |  |------ 子程序_取长宽比
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   RegEnumKey
           |  |
           |  |---[dll]------   RegCreateKey
           |  |
           |  |---[dll]------   RegCloseKey

调用的DLL命令:

.DLL命令 RegEnumKey, 整数型, "advapi32", "RegEnumKeyA", , 枚举指定项的子项_  零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 标准项名或项句柄, 整数型, , hkey，Long，一个已打开项的句柄，或者指定一个标准项名
    .参数 子项, 整数型, , dwindex，Long，欲获取的子项的索引。第一个子项的索引编号为零
    .参数 装载项名, 文本型, , lpanme，String，用于装载指定索引处项名的一个缓冲区
    .参数 装载项名长度, 整数型, , cdname，Long，lpName缓冲区的长度

.DLL命令 RegCreateKey, 整数型, "advapi32", "RegCreateKeyA", , 创建注册表项_  在指定的项下创建一个新项。如指定的项已经存在，那么函数会打开现有的项
    .参数 项句柄, 整数型, , hKey，Long，要打开项的句柄，或者一个标准项名
    .参数 项文本, 文本型, , lpSubKey，String，欲创建的新子项。可同时创建多个项，只需用反斜杠将它们分隔开即可。例如level1\level2\newkey
    .参数 返回项句柄, 整数型, 传址, phkResult，Long，指定一个变量，用于装载新子项的句柄

.DLL命令 RegCloseKey, , , "RegCloseKey"
    .参数 hKey, 整数型