Question

易语言读写配置项怎样写

我要写的是菜单上用的，写配置项我已经写出了，就是读不进来，不知道怎么才能读进来，看看源码吧，是全部源码：
.版本 2
.支持库 iext5
.支持库 eAPI

.程序集 窗口程序集1
.程序集变量 屏幕宽度, 整数型

.子程序 __启动窗口_创建完毕

移动 (取屏幕宽度 () － 170, 8, 65, 25)
_启动窗口.总在最前 ＝ 真
在任务条中显示 ＝ 假
随意移动 ＝ 真
气球提示框1.关联组件 (标签1, 取文本右边 (到文本 (取年份 (取现行时间 ())), 4) ＋ “年” ＋ 取文本右边 (到文本 (取月份 (取现行时间 ())), 2) ＋ “月” ＋ 取文本右边 (到文本 (取日 (取现行时间 ())), 2) ＋ “日” ＋ “ ” ＋ 返回星期几 (取星期几 (取现行时间 ())), -1, , , , )

读配置项 (取运行目录 () ＋ “\配置.ini”, “设置透明”, “透明度”, “”)

.子程序 _时钟1_周期事件

标签1.标题 ＝ 取文本右边 (“00” ＋ 到文本 (取小时 (取现行时间 ())), 2) ＋ “:” ＋ 取文本右边 (“00” ＋ 到文本 (取分钟 (取现行时间 ())), 2)

.子程序 _时钟2_周期事件

' 吸附屏幕左边
.如果真 (_启动窗口.左边 ≤ 20) ' 判断窗口与屏幕左边的距离
_启动窗口.左边 ＝ 0 ' 吸附左边
.如果真结束

' 吸附屏幕顶边
.如果真 (_启动窗口.顶边 ≤ 20) ' 判断窗口与屏幕顶边的距离
_启动窗口.顶边 ＝ 0 ' 吸附顶边
.如果真结束

时钟2.时钟周期 ＝ 0

.子程序 __启动窗口_位置被改变

.如果 (时钟2.时钟周期 ＝ 0)
时钟2.时钟周期 ＝ 200
.否则
返回 ()
.如果结束

.子程序 返回星期几, 文本型
.参数 星期数, 整数型

.判断开始 (星期数 ＝ 1)
返回 (“星期日”)
.判断 (星期数 ＝ 2)
返回 (“星期一”)
.判断 (星期数 ＝ 3)
返回 (“星期二”)
.判断 (星期数 ＝ 4)
返回 (“星期三”)
.判断 (星期数 ＝ 5)
返回 (“星期四”)
.判断 (星期数 ＝ 6)
返回 (“星期五”)
.判断 (星期数 ＝ 7)
返回 (“星期七”)
.默认
返回 (“”)
.判断结束

.子程序 _标签1_鼠标右键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

弹出菜单 (菜单, , )

.子程序 _随系统启动_被选择

.如果 (随系统启动.选中)
随系统启动.选中 ＝ 假
写注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Run\时钟”, “”)
.否则
随系统启动.选中 ＝ 真
写注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Run\时钟”, 取运行目录 () ＋ “\” ＋ 取执行文件名 ())
.如果结束

.子程序 _关闭时钟_被选择

销毁 ()

.子程序 _不透明_被选择

.如果 (不透明.选中)

.否则
不透明.选中 ＝ 真
设置窗口透明度 (_启动窗口.取窗口句柄 (), 255)
半透明.选中 ＝ 假
写配置项 (取运行目录 () ＋ “\配置.ini”, “设置透明”, “透明度”, “0”)

.如果结束

.子程序 _半透明_被选择

.如果 (半透明.选中)

.否则
半透明.选中 ＝ 真
设置窗口透明度 (_启动窗口.取窗口句柄 (), 180)
不透明.选中 ＝ 假
写配置项 (取运行目录 () ＋ “\配置.ini”, “设置透明”, “透明度”, “1”)
.如果结束

希望各位大哥大姐给个建议小弟，本人是超级菜菜，就连这个时钟不会的超级菜菜，望各位大虾多多提点，谢谢

Answer 1

你分别调试输出你的代码中写配置项（）和读配置项（）命令，看看其中哪一条返回假，就可以判断是哪一步出错了，还可以看看运行目录里是不是存在配置.ini文件，如果文件不存在怎么能读取呢。真正的高手不是看你写的程序有多大，而是会在调试中找到自己的不足 。
你的代码错在读取配置项后没有执行任何操作。
修正：
应该把
.版本 2
.支持库 eAPI

.如果真 (到整数 (读配置项 (取运行目录 () ＋ “\配置.ini”, “设置透明”, “透明度”, “”)) ＝ 1)
设置窗口透明度 (_启动窗口.取窗口句柄 (), 180)
.如果真结束
.如果真 (到整数 (读配置项 (取运行目录 () ＋ “\配置.ini”, “设置透明”, “透明度”, “”)) ＝ 0)
设置窗口透明度 (_启动窗口.取窗口句柄 (), 255)
替换你那一句读取配置项的代码。

Answer 2

读取配置（）