怎么拷贝文件?(66分)

  • 主题发起人 主题发起人 liq728
  • 开始时间 开始时间
L

liq728

Unregistered / Unconfirmed
GUEST, unregistred user!
例如:要把C:/aa/test1.txt更名拷贝成为D:/bb/test2.exe<br>只是代码实现,不能用TopenDialog、TsaveDialog等控件<br>会的高手请给出代码!<br>
 
CopyFile('C:/aa/test1.txt','D:/bb/test2.exe',false);
 
copyfile拷贝文件<br>deletefile删除文件<br>renamefile重命名文件<br>文件也有拷贝部分的函数 blockread blockwrite 比如打开某个文件然后拷贝前1000个字节<br>就可以用这个函数
 
OldFileName := 'C:/aa/test1.txt';<br>NewFileName := 'd:/bb/test2.exe';<br><br>result := copyFile(PChar(OldFileName), PChar(NewFileName), False);<br><br>if result then<br>&nbsp; showmessage('文件copy成功!')<br>else<br>&nbsp; showmessage('文件' + NEWFILENAME + '只读或者为其他程序独占!' );<br>
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部