用RegEnumKeyEx()函数枚举注册表子键的问题 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 用RegEnumKeyEx()函数枚举注册表子键的问题

我的收件箱(0)

共有 1444 人关注过本帖

标题：用RegEnumKeyEx()函数枚举注册表子键的问题

只看楼主加入收藏

xqbg111

等　级：新手上路
帖　子：2
专家分：0
注　册：2021-10-12
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：2

用RegEnumKeyEx()函数枚举注册表子键的问题

使用Windows API 函数RegEnumKeyEx()枚举系统注册表某个子键下面的子键，调用的时候怎么总是不成功。这个函数有8个参数，后面4个参数应该怎样赋值才对？用值传递还是地址传递？参数值给多少才能正确运行？请有经验的大师指点一二，在线急等，谢谢！

搜索更多相关主题的帖子: 枚举　注册表　函数　多少　参数　

2021-10-12 17:58

吹水佬

等　级：版主
威　望：451
帖　子：10833
专家分：43448
注　册：2014-5-20

第 2 楼

得分:10

图片附件: 游客没有浏览图片的权限，请登录或注册

程序代码：

DECLARE long RegOpenKeyEx IN Advapi32 long,string@,long,long,long@
DECLARE long RegCloseKey IN Advapi32 long
DECLARE long RegQueryInfoKey IN Advapi32 long,long,long,long,long@,long,long,long,long,long,long,long
DECLARE long RegEnumKeyEx IN Advapi32 long,long,string@,long@,long,long,long,long

hKey = 0
IF RegOpenKeyEx(0x80000001,;   && HKEY_CURRENT_USER
                "SOFTWARE\Microsoft",;
                0,;
                0x20019,;      && KEY_READ
                @hKey) != 0    && ERROR_SUCCESS
    RETURN
ENDIF
cSubKeys = 0
RegQueryInfoKey(hKey,0,0,0,@cSubKeys,0,0,0,0,0,0,0)     
IF cSubKeys > 0
    CREATE CURSOR tt (num I, SubKey C(254))
    achKey = REPLICATE(0h00,254)
    FOR i=1 TO cSubKeys
        cbName = 254
        IF RegEnumKeyEx(hKey,i-1,@achKey,@cbName,0,0,0,0)==0
            INSERT INTO tt VALUES (i, LEFT(achKey,cbName))
        ENDIF
    ENDFOR
    GO TOP 
    BROWSE TITLE "HKEY_CURRENT_USER\SOFTWARE\Microsoft"
ENDIF
RegCloseKey(hKey)