易语言,怎么把多个编辑框的内容保存到一个TXT文件里!
3个回答
展开全部
这个方法理论上应该可以无数个编辑框吧,我也不太清楚~~!
.版本 2
.程序集 窗口程序集1
.程序集变量 编辑框, 编辑框, , "0"
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
编辑框1.可视 = 假
.计次循环首 (3, i)
加入成员 (编辑框, 编辑框1)
复制窗口组件 (编辑框1, 编辑框 [i])
编辑框 [i].置父窗口 (_启动窗口)
编辑框 [i].左边 = 10
编辑框 [i].顶边 = 24 × i + 3
编辑框 [i].标记 = 到文本 (i)
编辑框 [i].可视 = 真
.计次循环尾 ()
.子程序 _保存按钮_被单击
.局部变量 文件号, 整数型
.局部变量 i, 整数型
通用对话框1.类型 = 1
通用对话框1.过滤器 = “文本文件(*.txt)|*.txt”
通用对话框1.初始目录 = “D:\”
通用对话框1.默认文件后缀 = “*.txt”
.如果真 (通用对话框1.打开 ())
文件号 = 打开文件 (通用对话框1.文件名, #改写, )
.计次循环首 (取数组成员数 (编辑框), i)
插入文本 (文件号, 编辑框 [到整数 (编辑框 [i].标记)].内容 + 字符 (13) + 字符 (10))
.计次循环尾 ()
关闭文件 (文件号)
.版本 2
.程序集 窗口程序集1
.程序集变量 编辑框, 编辑框, , "0"
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
编辑框1.可视 = 假
.计次循环首 (3, i)
加入成员 (编辑框, 编辑框1)
复制窗口组件 (编辑框1, 编辑框 [i])
编辑框 [i].置父窗口 (_启动窗口)
编辑框 [i].左边 = 10
编辑框 [i].顶边 = 24 × i + 3
编辑框 [i].标记 = 到文本 (i)
编辑框 [i].可视 = 真
.计次循环尾 ()
.子程序 _保存按钮_被单击
.局部变量 文件号, 整数型
.局部变量 i, 整数型
通用对话框1.类型 = 1
通用对话框1.过滤器 = “文本文件(*.txt)|*.txt”
通用对话框1.初始目录 = “D:\”
通用对话框1.默认文件后缀 = “*.txt”
.如果真 (通用对话框1.打开 ())
文件号 = 打开文件 (通用对话框1.文件名, #改写, )
.计次循环首 (取数组成员数 (编辑框), i)
插入文本 (文件号, 编辑框 [到整数 (编辑框 [i].标记)].内容 + 字符 (13) + 字符 (10))
.计次循环尾 ()
关闭文件 (文件号)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
比如:写到文件(“D:\1.TXT",编辑框1.内容+编辑框2.内容+编辑框3.内容)'这样一直加下去
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询