易语言用API取文本注册项

系统结构:取注册项值,打开注册表项扩展_,关闭注册表项_,取注册项数据值_,取注册项文本值_,取注册项数值_,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _取文本注册项
           |  |
           |  |------ 取注册项值
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   打开注册表项扩展_
           |  |
           |  |---[dll]------   关闭注册表项_
           |  |
           |  |---[dll]------   取注册项数据值_
           |  |
           |  |---[dll]------   取注册项文本值_
           |  |
           |  |---[dll]------   取注册项数值_

调用的DLL命令:

.DLL命令 打开注册表项扩展_, 整数型, "advapi32.dll", "RegOpenKeyExA"
    .参数 项句柄, 整数型
    .参数 子项名称, 文本型
    .参数 保留参数, 整数型
    .参数 常量标志, 整数型
    .参数 新子项变量, 整数型, 传址

.DLL命令 关闭注册表项_, 整数型, "advapi32.dll", "RegCloseKey"
    .参数 关闭项句柄, 整数型

.DLL命令 取注册项数据值_, 整数型, "advapi32.dll", "RegQueryValueExA"
    .参数 标准项名或项句柄, 整数型
    .参数 值名称, 文本型
    .参数 保留参数, 整数型
    .参数 类型, 整数型, 传址
    .参数 数据, 整数型
    .参数 数据长度, 整数型, 传址

.DLL命令 取注册项文本值_, 整数型, "advapi32.dll", "RegQueryValueExA"
    .参数 标准项名或项句柄, 整数型
    .参数 值名称, 文本型
    .参数 保留参数, 整数型
    .参数 类型, 整数型, 传址
    .参数 文本数据, 文本型
    .参数 文本数据长度, 整数型, 传址

.DLL命令 取注册项数值_, 整数型, "advapi32.dll", "RegQueryValueExA"
    .参数 标准项名或项句柄, 整数型
    .参数 值名称, 文本型
    .参数 保留参数, 整数型
    .参数 类型, 整数型
    .参数 数值数据, 整数型
    .参数 数值数据长度, 整数型