VclZip壓縮資料夾

壓縮指定路徑myzipdir下的資料夾b及b目錄下的所有檔案和檔案b.txt

function zipdir(zipmode:integer;zipcontrol:tvclzip;myzipname,myzipdir:string

):boolean;
begin
result:=false;
trywith zipcontrol do
begin
case zipmode of
0:rootdir:=''; //
指定壓縮目錄
1:rootdir:=myzipdir;
end;
overwritemode:=always;//
覆蓋 adddirentriesonrecurse:=true;
relativepaths:=true;//
相對路徑
recurse:=true;//
是否遍歷
recreatedirs:=true;//
建立目錄
storepaths:=true;//
儲存路徑，如rootdir不指定則保持完成路徑（去除碟符外的，需要保持碟符路徑設定storevolumes屬性）
zipname:=myzipname;
fileslist.add(myzipdir+'
\b\*.*');
fileslist.add(myzipdir+'
\b.txt');
zip;
result:=true;
end;
except
end;
end;

VclZip壓縮資料夾

壓縮指定路徑myzipdir下的資料夾b及b目錄下的所有檔案和檔案b.txt function zipdir zipmode integer zipcontrol tvclzip myzipname,myzipdir string boolean begin result false trywith...

python壓縮資料夾

usr bin python encoding utf 8 import time import os zip a whole directory and its sub directories and files os.walk 可以得到乙個三元tupple dirpath,dirnames,fi...

python 壓縮資料夾

def zip ya start dir start dir start dir 要壓縮的資料夾路徑 file news start dir zip 壓縮後資料夾的名字 z zipfile.zipfile file news,w zipfile.zip deflated for dir path,d...