方法一：
①定義api：
function ulong copyfile(ref string lpexistingfilename,ref string lpnewfilename,ulong bfailifexists) library kernel32.dll" alias for "copyfilea"
說明：複製檔案。
返回值： ulong，非零表示成功，零表示失敗。
引數 型別及說明
lpexistingfilename string，源檔名。
lpnewfilename string，目標檔名。
bfailifexists ulng，如果設為true（非零），那麼一旦目標檔案已經存在，則函式呼叫會失敗。否則目標檔案被改寫。
②指令碼：
string str_source, str_des
ulong ulng_result
str_source = "c:/lag.txt" //原始檔
str_des = "c:/tmp/111.txt" //目標檔案
ulng_result=copyfile(str_source,str_des, 0)
if ulng_result<>0 then
messagebox("ok","拷貝檔案成功!")
end if
方法二：
①先做一批處理檔案lag.bat：
copy c:/lag.txt c:/tmp/lll.txt
②在程式中呼叫此批處理檔案：
run("lag.bat")
Delphi中檔案拷貝方法集合
一 使用檔案流的方法進行拷貝，當然。同樣的道理，你也可以使用記憶體流等方法進行檔案的拷貝，原理是一樣的。procedure copyfile sourcefilename,targetfilename string var f1,f2 tfilestream begin f1 tfilestream...
API檔案 夾 操作總結 拷貝 刪除等
刪除檔案或者資料夾 bool deletefile string strpath fileop.fflags fof allowundo 允許放回 站 fof noconfirmation 不出現確認對話方塊 fof noerrorui 不出現錯誤對話方塊 fileop.pfrom ppath fi...
1 檔案操作的主要介面API
1.1.什麼是應用程式設計 1 典型的嵌入式產品就是基於linux系統來工作的。典型的嵌入式產品研發過程為 第1步是讓linux系統在硬體上跑起來 系統移植工作 第2步是基於linux系統來開發應用程式實現產品功能。2 基於linux去做應用程式設計，其實就是通過呼叫linux的系統api來實現應用...