易语言系统启动项管理源码

系统结构:填充列表框,枚举服务,服务回调,回调,注册表启动项,注册项分解启动项,注册表分解启动项,枚举注册表启动项,枚举目录启动项,加入文件,菜鸟老大_枚举注册表子项,glGetError,菜鸟老大_枚举注册表子项所有键名,易语言注册表常量到API,菜鸟老大_删除注册表项目,生成子项目数组,删除子项目数组,菜鸟老大_注册项目是否存在_键名,菜鸟老大_注册项目是否存在_项目,取目录,取文件名,取文件目录,取无扩展名,取扩展名,取扩展名图标,取关联文件文件名,取文件类型,取文件名参数,分割_呵呵,分割_呵呵_空格,取两文本中间数组,取两文本中间,注册表根目录取文本,取程序信息,定位文件,枚举键值,RegOpenKey,API_RegCloseKey,RegEnumKey,RegDeleteValueA,RegQueryValueEx,RegSetValueEx,取错误信息_,格式化消息字符串,GetFileVersionInfo,GetFileVersionInfoSize,VerQueryValue,MoveMemory,lstrcpy,VerLanguageName,FindWindow,FindWindowEx,SendMessageA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 填充列表框
           |  |
           |  |------ 枚举服务
           |  |
           |  |------ 服务回调
           |  |
           |  |------ 回调
           |  |
           |  |------ 注册表启动项
           |  |
           |  |------ 注册项分解启动项
           |  |
           |  |------ 注册表分解启动项
           |  |
           |  |------ 枚举注册表启动项
           |  |
           |  |------ 枚举目录启动项
           |  |
           |  |------ 加入文件
           |  |
           |  |------ _列表框_检查框状态被改变
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ _列表框_右键单击表项
           |  |
           |  |------ _定位文件_被选择
           |  |
           |  |------ _定位程序_被选择
           |  |
           |  |------ _定位注册表_被选择
           |  |
           |  |------ _隐藏服务_被选择
           |  |
           |  |------ _隐藏系统服务_被选择
           |  |
           |  |------ _只显示自动服务_被选择
           |  |
           |  |------ _启动项属性_被选择
           |  |
           |  |
======接口程序集
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 菜鸟老大_枚举注册表子项
           |  |
           |  |------ glGetError
           |  |
           |  |------ 菜鸟老大_枚举注册表子项所有键名
           |  |
           |  |------ 易语言注册表常量到API
           |  |
           |  |------ 菜鸟老大_删除注册表项目
           |  |
           |  |------ 生成子项目数组
           |  |
           |  |------ 删除子项目数组
           |  |
           |  |------ 菜鸟老大_注册项目是否存在_键名
           |  |
           |  |------ 菜鸟老大_注册项目是否存在_项目
           |  |
           |  |------ 取目录
           |  |
           |  |------ 取文件名
           |  |
           |  |------ 取文件目录
           |  |
           |  |------ 取无扩展名
           |  |
           |  |------ 取扩展名
           |  |
           |  |------ 取扩展名图标
           |  |
           |  |------ 取关联文件文件名
           |  |
           |  |------ 取文件类型
           |  |
           |  |------ 取文件名参数
           |  |
           |  |------ 分割_呵呵
           |  |
           |  |------ 分割_呵呵_空格
           |  |
           |  |------ 取两文本中间数组
           |  |
           |  |------ 取两文本中间
           |  |
           |  |------ 注册表根目录取文本
           |  |
           |  |------ 取程序信息
           |  |
           |  |------ 定位文件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   枚举键值
           |  |
           |  |---[dll]------   RegOpenKey
           |  |
           |  |---[dll]------   API_RegCloseKey
           |  |
           |  |---[dll]------   RegEnumKey
           |  |
           |  |---[dll]------   RegDeleteValueA
           |  |
           |  |---[dll]------   RegQueryValueEx
           |  |
           |  |---[dll]------   RegSetValueEx
           |  |
           |  |---[dll]------   取错误信息_
           |  |
           |  |---[dll]------   格式化消息字符串
           |  |
           |  |---[dll]------   GetFileVersionInfo
           |  |
           |  |---[dll]------   GetFileVersionInfoSize
           |  |
           |  |---[dll]------   VerQueryValue
           |  |
           |  |---[dll]------   MoveMemory
           |  |
           |  |---[dll]------   lstrcpy
           |  |
           |  |---[dll]------   VerLanguageName
           |  |
           |  |---[dll]------   FindWindow
           |  |
           |  |---[dll]------   FindWindowEx
           |  |
           |  |---[dll]------   SendMessageA

调用的DLL命令:

.DLL命令 枚举键值, 整数型, , "RegEnumValueA", , 零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 句柄, 整数型, , 一个已打开项的句柄，或者指定一个标准项名
    .参数 表项索引, 整数型, , 欲获取值的索引。注意第一个值的索引编号为零
    .参数 子键名, 文本型, , 用于装载位于指定索引处值名的一个缓冲区
    .参数 子键长度, 整数型, 传址, 用于装载lpValueName缓冲区长度的一个变量。一旦返回，它会设为实际载入缓冲区的字符数量
    .参数 lpReserved, 整数型, , 未用设为零
    .参数 键值类型, 整数型, 传址, 值的类型，用于装载值的类型代码的变量
    .参数 键值数据, 字节集, 传址, 用于装载值数据的一个缓冲区
    .参数 键值缓寸, 整数型, 传址, 用于装载lpData缓冲区长度的一个变量。一旦返回，它会设为实际载入缓冲区的字符数量

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

.DLL命令 API_RegCloseKey, 整数型, "advapi32.dll", "RegCloseKey", , 关闭系统注册表中的一个项（或键）  零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 hKey, 整数型, , 要关闭的项;

.DLL命令 RegEnumKey, 整数型, , "RegEnumKeyA"
    .参数 hKey, 整数型
    .参数 dwIndex, 整数型
    .参数 lpName, 文本型, 传址
    .参数 cbName, 整数型

.DLL命令 RegDeleteValueA, 整数型, "advapi32.dll", "RegDeleteValueA"
    .参数 hKey, 整数型
    .参数 lpValueName, 文本型

.DLL命令 RegQueryValueEx, 整数型, "advapi32.dll", "RegQueryValueExA", , 获取一个项的设置值  零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 hKey, 整数型, , 一个已打开项的句柄，或者指定一个标准项名
    .参数 lpValueName, 文本型, , 要获取值的名字
    .参数 lpReserved, 整数型, , 未用，设为零
    .参数 lpType, 整数型, 传址, 用于装载取回数据类型的一个变量
    .参数 lpData, 字节集, 传址, 用于装载指定值的一个缓冲区
    .参数 lpcbData, 整数型, 传址, 用于装载lpData缓冲区长度的一个变量。一旦返回，它会设为实际装载到缓冲区的字节数;

.DLL命令 RegSetValueEx, 整数型, "advapi32", "RegSetValueExA", , RegSetValue，零（ERROR_SUCCESS）表示成功。其他任何值都代表一个错误代码
    .参数 hKey, 整数型
    .参数 pValueName, 文本型
    .参数 Reserved, 整数型, , Long，未用，设为零
    .参数 dwType, 整数型
    .参数 lpData, 文本型, 传址
    .参数 cbData, 整数型

.DLL命令 取错误信息_, 整数型, "kernel32", "GetLastError", , $(b)

.DLL命令 格式化消息字符串, 整数型, "kernel32", "FormatMessageA", , FormatMessage
    .参数 标志, 整数型, , dwFlags
    .参数 来源, 整数型, , lpSource
    .参数 消息Id, 整数型, , dwMessageId
    .参数 语言Id, 整数型, , dwLanguageId
    .参数 缓冲区, 文本型, , lpBuffer
    .参数 缓冲区大小, 整数型, , nSize
    .参数 变数, 整数型, , Arguments

.DLL命令 GetFileVersionInfo, 整数型, "version.dll", "GetFileVersionInfoA"
    .参数 lptstrFilename, 文本型
    .参数 dwHandle, 整数型
    .参数 dwLen, 整数型
    .参数 lpData, 字节集, 传址

.DLL命令 GetFileVersionInfoSize, 整数型, "version.dll", "GetFileVersionInfoSizeA"
    .参数 lptstrFilename, 文本型
    .参数 lpdwHandle, 整数型

.DLL命令 VerQueryValue, 整数型, "version.dll", "VerQueryValueA"
    .参数 pBlock, 字节集, 传址
    .参数 lpSubBlock, 文本型
    .参数 lplpBuffer, 整数型, 传址
    .参数 puLen, 整数型, 传址

.DLL命令 MoveMemory, , "Kernel32", "RtlMoveMemory"
    .参数 dest, 字节型, 传址 数组
    .参数 Source, 整数型
    .参数 Length, 整数型

.DLL命令 lstrcpy, 整数型, "Kernel32", "lstrcpyA"
    .参数 lpString1, 文本型
    .参数 lpString2, 整数型

.DLL命令 VerLanguageName, 整数型, "Kernel32", "VerLanguageNameA"
    .参数 wLang, 整数型
    .参数 szLang, 文本型
    .参数 nSize, 整数型

.DLL命令 FindWindow, 整数型, "user32", "FindWindowA"
    .参数 lpClassName, 文本型
    .参数 lpWindowName, 整数型

.DLL命令 FindWindowEx, 整数型, "user32", "FindWindowExA"
    .参数 hWnd1, 整数型
    .参数 hWnd2, 整数型
    .参数 lpsz1, 文本型
    .参数 lpsz2, 整数型

.DLL命令 SendMessageA, 整数型, , "SendMessageA"
    .参数 窗口句柄, 整数型
    .参数 信息值, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型