易语言取系统启动项(循环枚举注册表项的键值)
循环枚举注册表项启动栏里的键值:
版本 2
.子程序 __启动窗口_创建完毕
.局部变量 hKey, 整数型
.局部变量 handel, 整数型
.局部变量 i, 整数型
.局部变量 lpName, 文本型
.局部变量 lpDate, 字节集
.局部变量 l, 整数型
handel = RegOpenKeyA (#HKEY_LOCAL_MACHINE,
“SOFTWARE\Microsoft\Windows\CurrentVersion\Run”, hKey)
.如果真 (handel ? 0)
返回 ()
.如果真结束
i = 0
.循环判断首 ()
lpName = 取空白文本 (255)
lpDate = 取空白字节集 (255)
handel = RegEnumValueA (hKey, i, lpName, 255, 0, 0, lpDate, 255)
.如果真 (handel = 0)
.如果真 (取文本长度 (lpName) < 12)
.计次循环首 (12 - 取文本长度 (lpName), l) ' 因为我用的是选择列表框,
把文字对齐一下!
lpName = lpName + “ ”
.计次循环尾 ()
.如果真结束
选择列表框1.加入项目 (lpName + “ ” + 到文本 (lpDate), )
.如果真结束
i = i + 1
.循环判断尾 (handel = 0)
RegCloseKey (handel)