易语言组合框内容保存
如何保存组合框内容呢。比如组合框里有苹果,雪梨。香橙3个项目,如图。这个只能保存组合框数值。我要的是保存组合框人容...
如何保存组合框内容呢。比如组合框里有苹果,雪梨。香橙3个项目,如图。这个只能保存组合框数值。我要的是保存组合框人容
展开
2012-03-11
展开全部
1.保存到文件
.子程序 _组合框1_列表项被选择
写到文件 (文件名, 到字节集 (组合框1.内容))
2.保存到其他
相同的方法
把”写到文件()“变一下就行
.子程序 _组合框1_列表项被选择
写到文件 (文件名, 到字节集 (组合框1.内容))
2.保存到其他
相同的方法
把”写到文件()“变一下就行
展开全部
.版本 2
.子程序 __启动窗口_创建完毕
写到文件 (“d:\1.txt”, 组合框1.列表项目)
.子程序 __启动窗口_创建完毕
写到文件 (“d:\1.txt”, 组合框1.列表项目)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
废话不多说..直接给源码..加上截图~~自己看~
-----------------------------------------------------------------------------------------------------------------
.版本 2
.程序集 窗口程序集1
.子程序 _按钮_保存_被单击
.局部变量 局部_计次, 整数型
.计次循环首 (组合框1.取项目数 (), 局部_计次)
写配置项 (取运行目录 () + “\配置.ini”, “组合框”, 到文本 (局部_计次), 组合框1.取项目文本 (局部_计次 - 1))
.计次循环尾 ()
.子程序 _按钮_读取_被单击
.局部变量 局部_配置节名数组, 文本型, , "0"
.局部变量 局部_临时文本, 文本型
.局部变量 局部_位置1, 整数型
.局部变量 局部_位置2, 整数型
.局部变量 局部_返回内容, 文本型
.局部变量 局部_计次, 整数型
.局部变量 局部_配置名, 文本型
.如果 (文件是否存在 (取运行目录 () + “\配置.ini”))
局部_配置节名数组 = 取配置节名 (取运行目录 () + “\配置.ini”)
.如果 (取数组成员数 (局部_配置节名数组) > 0)
局部_临时文本 = 到文本 (读入文件 (取运行目录 () + “\配置.ini”))
局部_位置1 = 寻找文本 (局部_临时文本, “[组合框]”, , 假)
.如果 (局部_位置1 ≠ -1)
局部_位置2 = 寻找文本 (局部_临时文本, “[”, 局部_位置1 + 1, 假)
.如果 (局部_位置2 ≠ -1)
局部_返回内容 = 取文本中间 (局部_临时文本, 局部_位置1 + 取文本长度 (“[组合框]”), 局部_位置2 - 局部_位置1 - 取文本长度 (“[组合框]”))
.否则
局部_返回内容 = 取文本中间 (局部_临时文本, 局部_位置1, 取文本长度 (局部_临时文本) - 局部_位置1)
.如果结束
局部_返回内容 = 子文本替换 (局部_返回内容, #换行符, , , , 真)
清除数组 (局部_配置节名数组)
.如果真 (寻找文本 (局部_返回内容, “=”, , 假) ≠ -1)
局部_配置节名数组 = 分割文本 (局部_返回内容, “=”, )
组合框1.清空 ()
.计次循环首 (取数组成员数 (局部_配置节名数组) - 1, 局部_计次)
局部_配置名 = 读配置项 (取运行目录 () + “\配置.ini”, “组合框”, 到文本 (局部_计次), )
组合框1.加入项目 (局部_配置名, )
.计次循环尾 ()
.如果真结束
.否则
信息框 (“找不到配置节名:[组合框]”, 0, )
.如果结束
.否则
信息框 (“配置节名不存在”, 0, )
.如果结束
.否则
信息框 (“文件:” + 取运行目录 () + “\配置.ini 不存在”, 0, )
.如果结束
-----------------------------------------------------------------------------------------------------------------
.版本 2
.程序集 窗口程序集1
.子程序 _按钮_保存_被单击
.局部变量 局部_计次, 整数型
.计次循环首 (组合框1.取项目数 (), 局部_计次)
写配置项 (取运行目录 () + “\配置.ini”, “组合框”, 到文本 (局部_计次), 组合框1.取项目文本 (局部_计次 - 1))
.计次循环尾 ()
.子程序 _按钮_读取_被单击
.局部变量 局部_配置节名数组, 文本型, , "0"
.局部变量 局部_临时文本, 文本型
.局部变量 局部_位置1, 整数型
.局部变量 局部_位置2, 整数型
.局部变量 局部_返回内容, 文本型
.局部变量 局部_计次, 整数型
.局部变量 局部_配置名, 文本型
.如果 (文件是否存在 (取运行目录 () + “\配置.ini”))
局部_配置节名数组 = 取配置节名 (取运行目录 () + “\配置.ini”)
.如果 (取数组成员数 (局部_配置节名数组) > 0)
局部_临时文本 = 到文本 (读入文件 (取运行目录 () + “\配置.ini”))
局部_位置1 = 寻找文本 (局部_临时文本, “[组合框]”, , 假)
.如果 (局部_位置1 ≠ -1)
局部_位置2 = 寻找文本 (局部_临时文本, “[”, 局部_位置1 + 1, 假)
.如果 (局部_位置2 ≠ -1)
局部_返回内容 = 取文本中间 (局部_临时文本, 局部_位置1 + 取文本长度 (“[组合框]”), 局部_位置2 - 局部_位置1 - 取文本长度 (“[组合框]”))
.否则
局部_返回内容 = 取文本中间 (局部_临时文本, 局部_位置1, 取文本长度 (局部_临时文本) - 局部_位置1)
.如果结束
局部_返回内容 = 子文本替换 (局部_返回内容, #换行符, , , , 真)
清除数组 (局部_配置节名数组)
.如果真 (寻找文本 (局部_返回内容, “=”, , 假) ≠ -1)
局部_配置节名数组 = 分割文本 (局部_返回内容, “=”, )
组合框1.清空 ()
.计次循环首 (取数组成员数 (局部_配置节名数组) - 1, 局部_计次)
局部_配置名 = 读配置项 (取运行目录 () + “\配置.ini”, “组合框”, 到文本 (局部_计次), )
组合框1.加入项目 (局部_配置名, )
.计次循环尾 ()
.如果真结束
.否则
信息框 (“找不到配置节名:[组合框]”, 0, )
.如果结束
.否则
信息框 (“配置节名不存在”, 0, )
.如果结束
.否则
信息框 (“文件:” + 取运行目录 () + “\配置.ini 不存在”, 0, )
.如果结束
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询