| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 桌面右键菜单 | |||
| 变量名 | 类 型 | 数组 | 备 注 |
| 注册表 | 注册表操作Ex |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 桌面右键菜单_创建SP | 整数型 | 成功返回空，失败返回失败原因 | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 主菜单名 | 文本型 | 桌面右键显示的菜单名 | 主菜单软件路径 | 文本型 | 创建一级菜单如不填写，点击菜单会报错，创建二级菜单时此参数无效 | 二级菜单名称 | 文本型 | 二级菜单的显示名称数组 | 二级软件路径 | 文本型 | 二级菜单点击后打开的软件路径,数组最大长度为二级菜单的数量 | 主菜单图标 | 字节集 | 菜单的图标 | 二级菜单图标 | 字节集 | 二级菜单的图标 |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| i | 整数型 | |||||
| 二级菜单数量 | 整数型 | |||||
| SubCommands关联项 | 文本型 | SubCommands项的字符串值，以分号“;”隔开，用于主菜单与二级菜单相关联 | ||||
判断 (取数组成员数 (二级菜单名称) ＝ 0) ' 只创建一级
注册表.写入键值Ex_文本 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名, “Icon”, 主菜单图标, #REG_SZ, 真) ' //菜单图标返回 (注册表.写入键值Ex_文本 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名 ＋ “\command\”, “”, 到字节集 (主菜单软件路径), #REG_SZ, 真)) ' //菜单点击后打开的软件路径
判断 (取数组成员数 (二级菜单名称) ≠ 取数组成员数 (二级软件路径))返回 (110) ' 二级菜单软件路径与二级菜单名称 的 数组长度不一致！！二级菜单数量 ＝ 取数组成员数 (二级菜单名称)
重定义数组 (二级菜单图标, 真, 二级菜单数量)
变量循环首 (1, 二级菜单数量, 1, i) ' //第一步注册表.写入键值Ex_文本 ( #HKEY_LOCAL_MACHINE, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\CommandStore\shell\desm_MyMenu” ＋ 到文本 (i), “Icon”, 二级菜单图标 [i], #REG_SZ, 真) ' //二级菜单图标注册表.写入键值Ex_文本 ( #HKEY_LOCAL_MACHINE, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\CommandStore\shell\desm_MyMenu” ＋ 到文本 (i), “”, 到字节集 (二级菜单名称 [i]), #REG_SZ, 真) ' //二级菜单名称(默认项)注册表.写入键值Ex_文本 ( #HKEY_LOCAL_MACHINE, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\CommandStore\shell\desm_MyMenu” ＋ 到文本 (i) ＋ “\command”, “”, 到字节集 (二级软件路径 [i]), #REG_SZ, 真) ' //二级菜单点击后打开的软件路径SubCommands关联项 ＝ SubCommands关联项 ＋ “desm_MyMenu” ＋ 到文本 (i) ＋ “;”
变量循环尾 () ' //第二步注册表.写入键值Ex_文本 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名, “Icon”, 主菜单图标, #REG_SZ, 真) ' //首级菜单图标返回 (注册表.写入键值Ex_文本 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名, “SubCommands”, 到字节集 (SubCommands关联项), #REG_SZ, 真)) ' //二级菜单链接(单个:mune1; 多个:menu1;menu2;menu3;...)
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 桌面右键菜单_删除 | 用户删除桌面右键菜单，会同时删除主菜单名关联的二级菜单 | ||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 主菜单名 | 文本型 | 桌面右键显示的菜单名 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| rev | 注册表_键 | |||||
| 关联的二级菜单项目 | 文本型 | 0 | ||||
| i | 整数型 | |||||
注册表.读取键值Ex ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名, “SubCommands”, rev)
注册表.关闭键Ex ()
关联的二级菜单项目 ＝ 分割文本 (字节集_到文本 (rev.键值), “;”, ) ' 二级菜单名称数组
如果真 (取数组成员数 (关联的二级菜单项目) ＞ 0) ' SubCommands有值，说明是二级菜单变量循环首 (1, 取数组成员数 (关联的二级菜单项目), 1, i)注册表.删除注册表项 ( #HKEY_LOCAL_MACHINE, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\CommandStore\shell\” ＋ 关联的二级菜单项目 [i] ＋ “\command”) ' 经实测，需先删除commad,不然无法删除键值注册表.删除注册表项 ( #HKEY_LOCAL_MACHINE, “SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\CommandStore\shell\” ＋ 关联的二级菜单项目 [i])变量循环尾 ()注册表.关闭键Ex ()注册表.删除注册表项 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名 ＋ “\command”)
注册表.删除注册表项 ( #HKEY_CLASSES_ROOT, “Directory\Background\shell\” ＋ 主菜单名)
