松鼠的博客

导航

统计

TVCLUnZip控件使用

复制代码
#include <vcl.h>
#include 
"VCLUnZip.hpp"
#include 
"kpZipObj.hpp"

#pragma hdrstop

//---------------------------------------------------------------------------

#pragma argsused
#pragma link "VCLUnZip"
int main(int argc, char* argv[])
{

TVCLUnZip
* Zipper = new TVCLUnZip(Application);

Zipper
->ZipName = "c:\test\Zipfile.zip"// set the zip filename
Zipper->ReadZip(); // open it and read its information

// List filenames in zip file

// determine which files to unzip

Zipper
->FilesList->Add("*.*"); // unzip all .cpp files

Zipper
->DoAll = True; // Don't unzip all files

Zipper
->DestDir = "c:\mydir"// Set destination directory
Zipper->RecreateDirs = true// don't recreate directory structures
Zipper->RetainAttributes = True; // Set attributes to original after unzipping

int NumUnzipped = Zipper->UnZip(); // Extract files, return value is the number of files actually unzipped

delete Zipper;
return 0;
复制代码

posted on   Xproer-松鼠  阅读(741)  评论(0编辑  收藏  举报

编辑推荐:
· 记一次.NET内存居高不下排查解决与启示
· 探究高空视频全景AR技术的实现原理
· 理解Rust引用及其生命周期标识(上)
· 浏览器原生「磁吸」效果!Anchor Positioning 锚点定位神器解析
· 没有源码,如何修改代码逻辑?
阅读排行:
· 全程不用写代码,我用AI程序员写了一个飞机大战
· MongoDB 8.0这个新功能碉堡了,比商业数据库还牛
· 记一次.NET内存居高不下排查解决与启示
· DeepSeek 开源周回顾「GitHub 热点速览」
· 白话解读 Dapr 1.15:你的「微服务管家」又秀新绝活了
点击右上角即可分享
微信分享提示