Question

易语言如何删除编辑框所有行开头几个字包括符号

例子,
目前三个控件, 一个按钮,两个编辑框
我要在按钮被单击的时候,会删除编辑框1所有行的前几个字符（需要删除的字符数就是读取编辑框2的内容）
谁可以写一个源码发给我,邮箱 2363750@qq.com
若编辑框2的内容为5则删除每行前五个字符,若为10则删除每行前10个字符，
就这样的

Answer 1

.版本 2

.程序集 窗口程序集1
.程序集变量 文本组, 文本型, , "0"
.程序集变量 计次, 整数型

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

编辑框1.是否允许多行 ＝ 真
编辑框1.滚动条 ＝ 2
编辑框1.内容 ＝ 到文本 (读入文件 (“D:\123.txt”))
文本组 ＝ 分割文本 (编辑框1.内容, #换行符, )

.子程序 _按钮1_被单击

.如果真 (到数值 (编辑框2.内容) ≤ 0)
返回 ()
.如果真结束
编辑框1.内容 ＝ “”
.计次循环首 (取数组成员数 (文本组), 计次)
.如果真 (取文本长度 (文本组 [计次]) ≤ 到数值 (编辑框2.内容))
文本组 [计次] ＝ “”
到循环尾 ()
.如果真结束
文本组 [计次] ＝ 取文本右边 (文本组 [计次], 取文本长度 (文本组 [计次]) － 到数值 (编辑框2.内容))
编辑框1.加入文本 (文本组 [计次], #换行符)
.计次循环尾 ()
' 写到文件 (“D:\123.txt”, 到字节集 (编辑框1.内容))

追问

不行呀

追答

怎么不行?

追问

可以写一个源码发给我吗？