C++中想用用instream循环读入多个txt文件,为什么第三个以后就不能读了呢?急求解

C++中想用用instream循环读入多个txt文件,为什么第三个以后就不能读了呢?急求解,第1张

打开一个文件,连续读,结束后关闭;

1、检查读写文件 *** 作,卖薯碰打开,关闭等

2、检查读 *** 作,读到什么地方去了,存放数据的空间是否出现问题手饥

你没有给出代码,中谈只能这样。

del拆分多个del的函数如下:

vari,WantedFragSize,RealToWrite:Integer

//声明两个文件流对象

//InStream为输入源文件流对象,OutStream为输出切割文件流对象

InStream,OutStream:TFileStream

S:Stringbegin

ifOpendialog1.Executethen

begin

SaveDialog1.Title:='输入你要保存的切割文件名'

IfSaveDialog1.Executethen

begin

WantedFragSize:=StrtoInt(Edit1.Text)//定义切割块大小

i:=0

//以只读的方式创建一个输入文件流对象

InStream:=TFileStream.Create(

OpenDialog1.FileName,fmOpenRead)

Try

//如果Instream流的当前指针位置不在末尾,就按照定义的块大小//来读出数据并存成文件

while(InStream.PositionBegin

s:=IntToStr(I)

whileLength(s)s:='.'+s

//生成切割文件的扩乎山展名,用三位数字来作为扩展名,方便组合文件

//如果InStream所剩的块大小小于定义的块大燃顷码小,则将皮哪剩下的块数//据存成文件

IfInStream.Size-InStream.PositionRealToWrite:=InStream.Size-InStream.Position

else

RealToWrite:=WantedFragSize

//创建一个输出文件流对象

OutStream:=TFileStream.Create(SaveDialog1.FileName+s,fmCreate)

try

OutStream.CopyFrom(InStream,RealToWrite)

Inc(i)

Finally

//释放输出文件流对象

OutStream.Free

end

end

Finally

InStream.Free

end

end

end


欢迎分享,转载请注明来源:内存溢出

原文地址: https://www.outofmemory.cn/tougao/12286276.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-24
下一篇 2023-05-24

发表评论

登录后才能评论

评论列表(0条)

保存