易语言 如何给连续的编辑框内容赋连续的数组
感谢 jdwz2009 的答案,原来编辑框也可以做变量,但是编辑框已经做好了,就是想把内容放进去,还有其它的办法吗 展开
.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 复制编辑框, 编辑框
.局部变量 LL, 整数型
.局部变量 文本组, 文本型, , "0"
.变量循环首 (1, 取数组成员数 (文本组), 1, LL) ' 原来的编辑框1是第一个,所以从2开始到10复制9个,你可以根据自己需要更改数量
.判断开始 (LL > 1)文本组 = 分割文本 (到文本 (读入文件 (取特定目录 (#系统桌面) + “IP代理文本.txt”)), #换行符, ) ' 这里是举例说明 你可以换成自己想要实现的文本
复制窗口组件 (编辑框1, 复制编辑框) ' 把“编辑框1”复制出来,存放复制出来的组件的变量是“复制编辑框”这个编辑框变量
复制编辑框.移动 (((LL - 1) % 5) × 编辑框1.宽度 + 编辑框1.左边, ((LL - 1) \ 5) × 编辑框1.高度 + 编辑框1.顶边, , ) ' 把复制出来的组件放到合适的地方。这里用的是一个公式。
复制编辑框.可视 = 真 ' 复制出来的组件与原组件具有相同的属性,但是它并不直接显示在窗口上,需要设定可视为“真”才行。
复制编辑框.内容 = 文本组 [LL]
.默认
编辑框1.内容 = 文本组 [LL]
.判断结束
.变量循环尾 ()
________________________固定编辑框代码_____________________________
.版本 2
.支持库 shell
.子程序 _按钮1_被单击
.局部变量 文本组, 文本型, , "0"
.局部变量 x, 整数型
.局部变量 编辑框变量, 编辑框
编辑框1.标记 = “1” ' 这5个标记可以在组件属性框里直接写,这里主要让你看到
编辑框2.标记 = “2” ' 可以根据自己有多少编辑框增加
编辑框3.标记 = “3”
编辑框4.标记 = “4”
编辑框5.标记 = “5”
文本组 = 分割文本 (到文本 (读入文件 (取特定目录 (#系统桌面) + “IP代理文本.txt”)), #换行符, ) ' 这里是举例说明 你可以换成自己想要实现的文本
.计次循环首 (5, x) ' 5可以改为你实际的编辑框数量,注意标记要全部设好
编辑框变量 = 取标记组件 (x)
编辑框变量.内容 = 文本组 [x]
.计次循环尾 ()
参考资料: http://www.jdw8.com