易语言枚举注册表项与键值

系统结构:子程序起始,子程序下级项目,关闭注册表项_,打开注册表项_,枚举注册项_,枚举注册项值_,

======窗口程序集_启动窗口
           |  |
           |  |------ _按钮_效果_被单击
           |  |
           |  |------ 子程序起始
           |  |
           |  |------ 子程序下级项目
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   关闭注册表项_
           |  |
           |  |---[dll]------   打开注册表项_
           |  |
           |  |---[dll]------   枚举注册项_
           |  |
           |  |---[dll]------   枚举注册项值_

调用的DLL命令:

.DLL命令 关闭注册表项_, 整数型, "advapi32.dll", "RegCloseKey", , 零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 关闭项句柄, 整数型, , hKey，要关闭的项句柄

.DLL命令 打开注册表项_, 整数型, "advapi32.dll", "RegOpenKeyA", , 打开一个现有的注册表项,零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 标准项名或句柄, 整数型, , hKey，一个已打开项的句柄，或指定一个标准项名
    .参数 项名, 字节集, , lpSubKey，要打开的项名
    .参数 打开注册表项句柄, 整数型, 传址, phkResult，指定一个变量，用于装载（保存）打开注册表项的一个句柄

.DLL命令 枚举注册项_, 整数型, "Advapi32.dll", "RegEnumKeyExA", , 枚举指定项下方的子项
    .参数 标准项名或句柄, 整数型, , 一个已打开项的句柄，或者指定一个标准项名
    .参数 项索引, 整数型, , 欲获取的子项的索引。第一个子项的索引编号为零
    .参数 项索引, 字节集, , 用于装载指定索引处项名的一个缓冲区
    .参数 缓冲区, 整数型, 传址, 指定一个变量，用于装载lpName缓冲区的实际长度（包括空字符）。一旦返回，它会设为实际装载到lpName缓冲区的字符数量
    .参数 保留参数, 整数型, , 未用，设为零
    .参数 项类名, 字节集, , 项使用的类名。可以为vbNullString
    .参数 项类名长度, 整数型, 传址, 用于装载lpClass缓冲区长度的一个变量。一旦返回，它会设为实际装载到缓冲区的字符数量
    .参数 修改时间, 文件时间_, , 枚举子项上一次修改的时间

.DLL命令 枚举注册项值_, 整数型, "Advapi32.dll", "RegEnumValueA", , 枚举指定项的值
    .参数 标准项名或句柄, 整数型, , 一个已打开项的句柄，或者指定一个标准项名
    .参数 项索引, 整数型, , 欲获取值的索引。注意第一个值的索引编号为零
    .参数 值名称, 字节集, , 用于装载位于指定索引处值名的一个缓冲区
    .参数 值名称长度, 整数型, 传址, 用于装载lpValueName缓冲区长度的一个变量。一旦返回，它会设为实际载入缓冲区的字符数量
    .参数 保留参数, 整数型, , 未用；设为零
    .参数 类型, 整数型, 传址, 用于装载值的类型代码的变量
    .参数 数据缓冲区, 字节集, , 用于装载值数据的一个缓冲区
    .参数 数据缓冲区长度, 整数型, 传址, 用于装载lpData缓冲区长度的一个变量。一旦返回，它会设为实际载入缓冲区的字符数量