字节集分割后数据丢失!

Will

[e]
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 数据, 字节集
.局部变量 字节集数组, 字节集, , "0"
.局部变量 写出的字节集, 字节集
.局部变量 n1, 整数型
数据 ＝ 读入文件 (“D:\test.exe”)
标签1.标题 ＝ 到文本 (取字节集长度 (数据) ÷ 1024) ＋ “kb”
字节集数组 ＝ 分割字节集 (数据, , )
进度条1.最大位置 ＝ 取数组成员数 (字节集数组)
.计次循环首 (取数组成员数 (字节集数组), n1)
    写出的字节集 ＝ 写出的字节集 ＋ 字节集数组 [n1]
    进度条1.位置 ＝ n1
    处理事件 ()
.计次循环尾 ()
写到文件 (“D:\test1.exe”, 写出的字节集)

[/e]


写出来的文件数据丢失了一部分...到底哪里错了???

找到问题了...

爱家的小懒虫

[e].版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 数据, 字节集
.局部变量 写出的字节集, 字节集
.局部变量 n1, 整数型
.局部变量 块大小, 整数型
数据 ＝ 读入文件 (“D:\1.txt”)
调试输出 (数据)
标签1.标题 ＝ 到文本 (取字节集长度 (数据) ÷ 1024) ＋ “kb”
块大小 ＝ 1  ' 分块大小
进度条1.最大位置 ＝ 取字节集长度 (数据) ÷ 块大小
.变量循环首 (1, 取字节集长度 (数据), 块大小, n1)
    写出的字节集 ＝ 写出的字节集 ＋ 取字节集中间 (数据, n1, 块大小)
    进度条1.位置 ＝ n1
    调试输出 (写出的字节集)
.变量循环尾 ()
调试输出 (写出的字节集)
写到文件 (“D:\2.txt”, 写出的字节集)
[/e]

字节集数组 ＝ 分割字节集 (数据, , )

没有分割 符?