多组件保存读取例子

初夏喔

测试16.e (4.38 KB, 下载次数: 35)

2021-12-15 18:07 上传

点击文件名下载附件
下载积分: 精币 -2 枚

就这样吧，混个参与奖

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
编辑框	编辑框
名称	文本型
句柄	整数型
i	整数型

句柄 ＝ 寻找组件 (_启动窗口, , “编辑框”, , )
计次循环首 (取找到组件数目 (句柄), i)
编辑框 ＝ 取所找到组件 (句柄, i － 1)
名称 ＝ 取组件名称 (编辑框)
编辑框.内容 ＝ 读配置项 (“D:\1.ini”, “编辑框”, 名称, )
如果真 (名称 ≠ “编辑框1”)
事件转移 (编辑框, 编辑框1)

计次循环尾 ()
清除组件寻找句柄 (句柄)

子程序名	返回值类型	公开	备 注
_编辑框1_内容被改变

变量名	类 型	静态	数组	备 注
编辑框	编辑框

编辑框 ＝ 取事件组件 ()
写配置项 (“D:\1.ini”, “编辑框”, 取组件名称 (编辑框), 编辑框.内容)

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 编辑框, 编辑框<br /> .局部变量 名称, 文本型<br /> .局部变量 句柄, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 句柄 ＝ 寻找组件 (_启动窗口, , “编辑框”, , )<br /> .计次循环首 (取找到组件数目 (句柄), i)<br />     编辑框 ＝ 取所找到组件 (句柄, i － 1)<br />     名称 ＝ 取组件名称 (编辑框)<br />     编辑框.内容 ＝ 读配置项 (“D:\1.ini”, “编辑框”, 名称, )<br />     .如果真 (名称 ≠ “编辑框1”)<br />         事件转移 (编辑框, 编辑框1)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (句柄)<br /> <br /> .子程序 _编辑框1_内容被改变<br /> .局部变量 编辑框, 编辑框<br /> <br /> 编辑框 ＝ 取事件组件 ()<br /> 写配置项 (“D:\1.ini”, “编辑框”, 取组件名称 (编辑框), 编辑框.内容)

来自群组: 热心网友

xxz123xxz

支持支持支持

果心豆腐酱

前天还一直在找的

小老王

感谢楼主分享，支持一下~~！！！

趣冉科技

感谢楼主分享，支持一下~~！！！

chenwing

感谢分享

fjgh

感谢分享

剧终0616

原来，易语言也可以和火山一样，所有同类型组件的事件都在一个子程序里面！！

lm88818

有点意思！·