易语言分割成10个100MB文件怎么合成一个文件

我的yyy123

把1GB视频分割为10个100MB的文件，合并是提示内存不足，用写出数据（）和写出字节集（），合并后，没有内容

走一回

加大内存，不能解决吗？买早餐手机扫码提示金额不足，一般就是到银行去充值银行卡。

快乐的大胖子

https://125.confly.eu.org/forum.php?mod ... mp;highlight=ffmpeg

石榴熟了

合并 用打开文件

北寂

定制一个程序啊、有意+q3154464659

cherryy

提示内存不足 ，就是没有内存了，建议换个盘试试，用ffmpeg合并问题少，

我的yyy123

今天找了个下载的源码，里面有文件合并，参考了一下，用写出数据（）和写出字节集（）合并分割的文件，均成功了，没有成功之前觉得太难了，大文件无法操作，成功后在看，哦草，怎么这么简单，简单的一个循环4行代码全部解决了。

renzhanxin

分享出来啊。大家借鉴下。。

我的yyy123

renzhanxin 发表于 2024-7-24 21:49
分享出来啊。大家借鉴下。。

用文件号，就不会出现内存不足提示了，我找找看

我的yyy123

.版本 2

.子程序 读入文件_子程序, 长整数型, , 500M以上，多线程不崩溃的,大文件读入。
.参数 原文件路径, 文本型
.参数 字节集数组, 字节集, 参考 数组
.局部变量 文件路径, 文本型
.局部变量 文件号, 整数型
.局部变量 字节集, 字节集
.局部变量 文件大小, 长整数型
.局部变量 文件号长啦, 长整数型
.局部变量 aa, 长整数型
.局部变量 ii, 整数型

文件路径 ＝ 原文件路径
文件号 ＝ 打开文件 (文件路径, 1, )
文件号长啦 ＝ 取文件长度 (文件号)
' 文件大小 ＝ 11  ' 测试
文件大小 ＝ 1024 × 100 × 1024  ' 大于100M
.如果 (文件号长啦 ＞ 文件大小)  ' 大于100M，就分多段读入
    aa ＝ 0
    .计次循环首 (文件号长啦 ÷ 文件大小 ＋ 1, ii)
        字节集 ＝ {  }
        移动读写位置 (文件号, aa, 文件大小)
        字节集 ＝ 读入字节集 (文件号, 文件大小)
        ' 内存字节集 ＝ 内存字节集 ＋ 字节集  ' 20231213-4-内存溢出，还是不行，太大了。
        aa ＝ aa ＋ 文件大小 × 2
        .如果真 (字节集 ≠ {  })
            加入成员 (字节集数组, 字节集)
        .如果真结束
        ' 输出调试文本 (到文本 (取数组成员数 (字节集数组)) ＋ “==d==” ＋ 到文本 (ii))  ' 测试
    .计次循环尾 ()
.否则
    ' ---------------------
    移到文件首 (文件号)
    字节集 ＝ 读入字节集 (文件号, 取文件长度 (文件号))
    加入成员 (字节集数组, 字节集)
.如果结束
' 输出调试文本 (取文件长度 (文件号))' 测试
关闭文件 (文件号)
返回 (文件号长啦)