使用流和动态数组读写文件
2007-03-15 22:59
309 查看
var
FileBuf:Array of Byte;//[0..4194304]
procedure TForm1.ReadWriteFile(SrcFile, DescFile: String);
var
MyFile:TMemoryStream;
iLen:Int64;
begin
iLen:=0;
try
MyFile:=TMemoryStream.Create;
MyFile.LoadFromFile(SrcFile);
iLen:=MyFile.Size;
SetLength(FileBuf,iLen);
MyFile.ReadBuffer(FileBuf[0],iLen);
finally
FreeAndNil(MyFile);
end;
try
MyFile:=TMemoryStream.Create;
MyFile.Seek(0,soFromBeginning);
MyFile.WriteBuffer(FileBuf[0],iLen);
MyFile.SaveToFile(DescFile);
finally
FreeAndNil(MyFile);
end;
end;
FileBuf:Array of Byte;//[0..4194304]
procedure TForm1.ReadWriteFile(SrcFile, DescFile: String);
var
MyFile:TMemoryStream;
iLen:Int64;
begin
iLen:=0;
try
MyFile:=TMemoryStream.Create;
MyFile.LoadFromFile(SrcFile);
iLen:=MyFile.Size;
SetLength(FileBuf,iLen);
MyFile.ReadBuffer(FileBuf[0],iLen);
finally
FreeAndNil(MyFile);
end;
try
MyFile:=TMemoryStream.Create;
MyFile.Seek(0,soFromBeginning);
MyFile.WriteBuffer(FileBuf[0],iLen);
MyFile.SaveToFile(DescFile);
finally
FreeAndNil(MyFile);
end;
end;
相关文章推荐
- 使用流和动态数组读写文件
- char*动态数组用c++ifstream和ofstream进行文件读写并用memset初始化
- 使用反射和范型来动态读写应用程序配置文件
- ini文件中动态数组的格式和QSetting的读写
- PB8调用使用C++与C#分别编写生成解压缩带有密码的zip压缩文件的动态链接库dll(部分内容转自互联网)
- 第十二节:深究内核模式锁的使用场景(自动事件锁、手动事件锁、信号量、互斥锁、读写锁、动态锁)
- java 读写word java 动态写入 模板文件
- C++ 读写文本文件、统计文件的行数、读取文件数据到数组
- 动态数组使用
- QT 使用QSettings 读写ini配置文件
- C#中动态读写App.config配置文件
- 使用读写文件读取网页内容
- 使用POI读写word docx文件
- windows下VS2010中使用netcdf的C++接口实现.nc文件的读写
- 如何使用MATLAB语言读写YUV文件
- 使用ArrayList数组动态添加元素
- 使用CStdioFile读写文件
- 使用Servlet实现动态文件下载
- CFile和CStdioFile的文件读写使用方法
- C++文件读写操作(四)读取文件数据到临时数组