xp风格化应用程序模块

xp风格化应用程序模块

.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.局部变量 最近程序, 文本型

通用对话框1.标题 ＝ “请选择要xp风格化的应用程序”
通用对话框1.过滤器 ＝ “应用程序(*.exe)|*.exe”
配置文件 ＝ 取运行目录 () ＋ “option.ini”
.变量循环首 (1, 10, 1, i)
    最近程序 ＝ 读配置项 (配置文件, “recent”, “file” ＋ 到文本 (i), “”)
    .如果真 (最近程序 ＝ “”)
        跳出循环 ()
    .如果真结束
    组合框1.加入项目 (最近程序, )
.变量循环尾 ()

@易语言代码编写例子