管理电脑应用源码卷帘式软件分类菜单

' 这里先加载出程序内设置好的菜单项目，因为不用加载菜单
' 然后再加入菜单以及项目

项目索引 ＝ 1
项目图标组 ＝ 卷帘式菜单1.项目列表图片组
文件名 ＝ 取文本右边 (接收到的文件路径, 取文本长度 (接收到的文件路径) － 倒找文本 (接收到的文件路径, “\”, , 假))  ' 取文件名加后缀
文件名 ＝ 取文本左边 (文件名, 寻找文本 (文件名, “.”, , 假) － 1)  ' 取文件名，去除后缀
.如果真 (卷帘式菜单1.现行选中菜单 ＝ -1)
    信息框 (“请选择一个菜单！”, 48, , )
    返回 ()
.如果真结束
图标号 ＝ 加入图片 (项目图标组, 图标_取文件图标 (接收到的文件路径), #白色)
卷帘式菜单1.项目列表图片组 ＝ 项目图标组
.如果真 (卷帘式菜单1.取项目数 (卷帘式菜单1.现行选中菜单) ＞ 0)
    项目索引 ＝ 项目索引 ＋ 卷帘式菜单1.取项目数 (卷帘式菜单1.现行选中菜单)
.如果真结束
卷帘式菜单1.加入项目 (文件名, 卷帘式菜单1.现行选中菜单, , 图标号, )
当前菜单名 ＝ 卷帘式菜单1.取菜单名称 (卷帘式菜单1.现行选中菜单)
写配置项 (取运行目录 () ＋ “\配置.ini”, 当前菜单名, 到文本 (项目索引), 文件名 ＋ “-” ＋ 到文本 (图标号) ＋ “-” ＋ 接收到的文件路径)
写配置项 (取运行目录 () ＋ “\配置.ini”, 当前菜单名, “项目数”, 到文本 (项目索引))
写到文件 (取运行目录 () ＋ “\项目图标组.eil”, 项目图标组)