完美的工具包，卷帘式菜单超级列表框带图标

功能：
自由添加菜单，项目
自动提取图标
自动提取项目名称
仿QQ伸缩功能

拖放对象1.注册拖放控件 (超级列表框1.取窗口句柄 ())
左边 ＝ 取屏幕宽度 () － 350
置托盘图标 (图标, “工具箱V1.1完美版”)
aa ＝ 到文本 (读入文件 (取运行目录 () ＋ “\deng.deng”))
bb ＝ 分割文本 (aa, #换行符, )
a ＝ 到整数 (读配置项 (取运行目录 () ＋ “\pz.ini”, “菜单”, “菜单数”, ))
.计次循环首 (a, b)
卷帘式菜单1.加入菜单 (读配置项 (取运行目录 () ＋ “\pz.ini”, “名称”, 到文本 (b － 1), ), , )
.计次循环尾 ()
.计次循环首 (取数组成员数 (bb), a)
卷帘式菜单1.加入项目 (取文本右边 (bb [a], 取文本长度 (bb [a]) － (寻找文本 (bb [a], “BsF”, , 假) ＋ 2)), 到整数 (取文本左边 (bb [a], 寻找文本 (bb [a], “BsF”, , 假) － 1)), , , )
.计次循环尾 ()
卷帘式菜单1.现行选中菜单 ＝ 到整数 (读配置项 (取运行目录 () ＋ “\pz.ini”, “开机菜单”, “开机”, ))
超级列表框1.全部删除 ()
超级列表框1.顶边 ＝ 40 ＋ 卷帘式菜单1.现行选中菜单 × 23
超级列表框1.高度 ＝ 400 － 卷帘式菜单1.取菜单数 () × 23 ＋ 23
图片 ＝ 超级列表框1.图片组
.计次循环首 (卷帘式菜单1.取项目数 (卷帘式菜单1.现行选中菜单), d)
图片11 ＝ 提取加入图片 (图片, 卷帘式菜单1.取项目名称 (d － 1, 卷帘式菜单1.现行选中菜单), , 假)
文本 ＝ 分割文本 (卷帘式菜单1.取项目名称 (d － 1, 卷帘式菜单1.现行选中菜单), “\”, )
超级列表框1.图片组 ＝ 图片
超级列表框1.插入表项 (, 取文本左边 (文本 [取数组成员数 (文本)], 寻找文本 (文本 [取数组成员数 (文本)], “.”, , 假) － 1), 图片11, , , )
.计次循环尾 ()