Delphi中实现文件拷贝的三种方法
来源:互联网 发布:jsp下拉框数据库 编辑:程序博客网 时间:2024/05/27 21:15
Delphi中实现文件拷贝的三种方法
1.调用API函数
procedure CopyFile(FromFileName,ToFileName:string);
var
f1,f2:file;
Begin
AssignFile(f1,FromFileName); file://指定源文件名
AssignFile(f2,ToFileName); file://指定目标文件名
Reset(f1);
Try
Rewrite(f2);
Try
If Lzcopy(TfileRec(f1).handle,TfileRec(f2).Handle)<0
Then
Raise EinoutError.creat('文件复制错误')
Finally
CloseFile(f2); file://关闭 f2
End;
Finally
Until length(sLine)<=0;
End;
End;
2.文件流
procedure copyfile;
var f1,f2: tfilestream ;
begin
f1:=Tfilestream.Create(sourcefilename,fmopenread);
try
f2:=Tfilestream.Create(targetfilename,fmopenwrite or fmcreate);
try
f2.CopyFrom(f1,f1.size);
finally
f2.Free;
end;
finally
f1.Free;
end;
end;
3.利用内存块读写buffer实现
Procudure FileCopy(const Fromfile,Tofile:string);
Var
F1,F2:file;
NumRead,Numwritten:word;
Buf:array [1..2048] of char;
Begin
AssignFile(F1,Fromfile);
Reset(F1,1);
AssignFile(F2,Tofile);
Rewrite(F2,1);
Repeat
BlockRead(F1,buf,sizeof(buf),NumRead);
BlockWrite(F2,buf,Numread,NumWritten);
Until (NumRead=0) or (NumWritten<>NumRead);
CloseFile(F1);
CloseFile(F2);
End;
- Delphi中实现文件拷贝的三种方法
- Delphi中实现文件拷贝的三种方法
- Delphi中实现文件拷贝的三种方法
- Delphi中实现文件拷贝的三种方法
- Delphi中实现文件拷贝的三种方法
- Delphi中实现文件拷贝的三种方法 (收藏)
- Java---三种文件拷贝的实现方法
- 拷贝文件的三种方法
- js 数组的深拷贝和浅拷贝三种实现深拷贝的方法
- 在WIN95中实现文件拷贝的编程方法
- 在WIN95中实现文件拷贝的编程方法
- 在WIN95中实现文件拷贝的编程方法
- 在WIN95中实现文件拷贝的编程方法
- 在远程桌面中,实现文件传送/传输/拷贝的方法.
- 三种IO库实现文件的拷贝
- Delphi中获取文件夹路径的三种方式 和实现文件复制
- 常见的实现文件拷贝的两种方法
- 三种方法实现Delphi无标题窗体的拖动
- 演讲启示
- 左中右3栏布局中最先显示中栏内容的方法
- Geoprocessing Servies的发布
- soap例子
- [转]QQ界面编程,绝佳的学习材料
- Delphi中实现文件拷贝的三种方法
- 启动oracle
- proteus 中AMPIRE12864仿真
- 面试技巧:16个经典面试问题回答思路(转)
- MySQL grant 语法的详细解析
- AMPIRE12864显示汉字(protues仿真)
- FusionChart中js参数为中文乱码的解决办法
- C#导出Excle文件
- Javascript在应用开发中越来越重要