精易论坛

标题: 易语言 把一个500行的文本 分成2部分 [打印本页]

作者: 公子凯    时间: 2025-1-28 20:02
标题: 易语言 把一个500行的文本 分成2部分
文本一共有300到500行,我想前200行分成一部分,剩下的行分成一部分,这个易语言怎么写分割好点

作者: tan666    时间: 2025-1-28 20:06
计次循环不就行了吗
作者: tan666    时间: 2025-1-28 20:12
  
变量名类 型静态数组备 注
文本文本型 
文本数组文本型0
次数整数型 
文本0文本型 
文本数组 = 分割文本 (文本, #换行符, )
计次循环首 (取数组成员数 (文本数组), 次数)
文本 = 文本 + 文本数组 [次数]#换行符
如果真 (次数 = 200)
文本0 = 文本
文本 = “”

计次循环尾 ()
调试输出 (文本0)
调试输出 (文本)


i支持库列表   支持库注释   
spec特殊功能支持库


作者: 算法艺术家    时间: 2025-1-28 20:54
  
子程序名返回值类型公开备 注
文本范围取行文本型 将分割后的文本逐行写出或写出指定行数
参数名类 型参考可空数组备 注
文本型数组变量文本型分割后的文本
起始行整数型起始行
结束行整数型结束行
变量名类 型静态数组备 注
i整数型 
整数型 
已取的文本文本型写出的文本行
行 = 取数组成员数 (文本型数组变量)
计次循环首 (行, i)
如果真 (i ≥ 起始行 i ≤ 结束行)
已取的文本 = 已取的文本 + 文本型数组变量 [i]#换行符

计次循环尾 ()
返回 (已取的文本)


作者: chenboss    时间: 2025-1-28 21:00
大文本分段保存小文本.e

作者: sunfly    时间: 2025-1-28 21:01
定位200行换行符,-1取截取位置
剩下的取值
这不就是循环200次找换行符的问题吗?
作者: 熬夜    时间: 2025-1-28 22:09
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14680430
作者: 果心豆腐酱    时间: 2025-1-28 22:43
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
文本内容文本型 
行数组文本型0
前200行文本型 
剩余行文本型 
i整数型 
' 假设文本内容已经读取到一个变量中
文本内容 = 编辑框1.内容
' 将文本按行分割成数组
行数组 = 分割文本 (文本内容, #换行符, )
' 初始化前200行和剩余行
前200行 = “”
剩余行 = “”
' 遍历数组,前200行放入前200行变量,剩下的放入剩余行变量
计次循环首 (取数组成员数 (行数组), i)
如果 (i ≤ 200)
前200行 = 前200行 + 行数组 [i]#换行符
剩余行 = 剩余行 + 行数组 [i]#换行符

计次循环尾 ()
' 显示结果
编辑框2.内容 = 前200行
编辑框3.内容 = 剩余行



作者: LySyhd    时间: 2025-1-29 12:53
我在精易论坛搜索映射,然后晕晕地写了这个临时半成品,给楼主测试下(估计你应该是你需要的吧),今天大年初一(过年好),零碎事太多,回头我再研究下源码,太乱了

LySyhd_用映射快速分割指定行大文件.7z

7.5 KB, 下载次数: 0


作者: qq977352880    时间: 2025-1-29 18:30
来赚个积分,感谢分享。





欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4