?
.Net中函数声明:
public static extern int MyZip_AddFile(String SrcFile,String ZipFile);
public static extern int MyZip_AddDirectory(String SrcPath,String ZipFile);
public static extern int MyZip_ExtractFileAll(String ZipFile,String PathName);
public static extern int MyZip_ExtractFile(String ZipFile,String srcName,String DstName);
?
1.(压缩文件)
Function MyZip_AddFile(SrcFile,ZipFile:pchar):integer;stdcall;
功能 : 将文件SrcFile添加到压缩文档ZipFile
参数 : SrcFile?????? 待压缩文件(全路径)
?????? Zipfile?????? 目标文件(全路径)
返回 : <0??????????? 失败
?????? >0??????????? 成功
说明 : 同名文件将自动被替换(overwrite)
?
2.(压缩目录)
Function MyZip_AddDirectory(SrcPath,ZipFile:pchar):integer;stdcall;
功能 : 将目录SrcPath里的所有文件(子目录)添加到压缩文档ZipFile
参数 : SrcPath?????? 待压缩目录(全路径)
?????? Zipfile?????? 目标文件(全路径)
返回 : <0??????????? 失败
?????? >0??????????? 成功
说明 : 同名文件将自动被替换(overwrite)
?
1.(解压缩包中所有文件)
Function MyZip_ExtractFileAll(ZipFile,PathName:pchar):integer;stdcall;
功能 : 将ZipFile中包含的所有文件解包到文件夹PathName
参数 : ZipFile?????? 压缩文件(全路径)
?????? PathName????? 文件输出路径(如果不存在,则自动创建该目录)
返回 : <0??????????? 失败
?????? =0??????????? 压缩文件中未包含任何文件
?????? >0? ??????????解包的文件数量
说明 : 同名文件将自动被替换(overwrite)
?
2.(解压缩包中指定文件)
Function MyZip_ExtractFile(ZipFile,srcName,DstName:pchar):integer;stdcall;
功能 : 从ZipFile中将由SrcName指定的文件解包到由DstName指定的目标文件
参数 : Zipfile?????? 压缩文件(全路径)
?????? SrcName?????? 需要解包的文件(不包含路径)
?????? DstName?????? 目标文件(全路径)
返回 : <0??????????? 失败
?????? =0??????????? 压缩文件中未包含SrcName
?????? >0??????????? 成功
说明 : 同名文件将自动被替换(overwrite)
?
1.(错误信息)
Function MyZip_GetLastError(out msg : ShortString):integer;stdcall;
功能 : 在压缩/解压的过程中,如有错误发生,可立即调用该函数获取相关错误信息,并由msg返回
参数 : msg?????????? 用于返回相关错误信息
返回 : <0??????????? 失败
?????? >0??????????? 成功
?
?