压缩共17篇

Delphi 通用压缩单元

/// <author>cxg 2020-7-7</author>/// 支持跨os,支持d7及以上版本unit zip; interface {$if CompilerVersion>= 21}  //d2...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
02813
Delphi 7zip 示例调用7z.dll 压缩及解压.7z文件-Delphi编程技巧大全

Delphi 7zip 示例调用7z.dll 压缩及解压.7z文件

其中源码只包含sevenzip.pas一个单元,源码中readme.htm给出了简单示例。主要代码如下,在Win7+Delphi XE 3 下调试通过:unit Form_Main; interface uses  Winapi.Windows, Wina...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
03611

Delphi VclZip压缩文件夹

压缩指定路径MyZipDir下的文件夹b及b目录下的所有文件和文件b.txtfunction ZipDir(zipMode:Integer;zipControl:TVCLZip;MyZipName,MyZipDir:string):Boolean;  begin    {压缩指...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0535

Delphi VCLZip实现分卷压缩

function   Zip(ZipMode,PackSize:Integer;ZipFile,UnzipDir:String):Boolean;   //压缩或解压缩文件var  ziper:TVCLZip;begin  //函数用法:Zip(压缩模式,压缩...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
05514

Delphi 对Zlib单元进行再封装

对Zlib单元进行再封装低版本DELPHI,如D7,ZLIB.pas单元封装的很简陋,因此有必要再封装,以增加使用的便利性。高版本DELPHI,zlib.pas本身提供的接口已经相当完善。Zlib.pas是DELPHI自带的压缩...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0459

delphi压缩与解压_不需要特别的控件

delphi压缩与解压,比较简单,也比较实用,对我来说已经足够,我只想让客户端下载一个压缩文件到本地后解压出来就行,看网上有用什么控件的,我的是delphi6没装那控件,在公司管的比较严,要装...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0515
Delphi结合WinRAR生成自解压文件-Delphi编程技巧大全

Delphi结合WinRAR生成自解压文件

最近写的一个程序需要将新编译的文件打包成自解压文件供用户去安装,在程序中通过WinRAR命令结合WinRAR自解压注释命令实现该功能。WinRAR命令WinRAR自解压注释命令 程序界面:文件目录&nbs...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
03215

Delphi 把窗体客户区图像保存到文件或剪切板

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;type  TForm1 = class(TForm)    Butt...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
04614

Delphi XE2支持ZIP压缩文件的操作了

Delphi XE2支持ZIP压缩文件的操作了,新增 System.Zip 单元, 可用一句话压缩整个文件夹,太强大了,如下是一小段测试的代码:uses System.Zip; procedure TForm1.FormCreate(Sender: TObject); ...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0258

delphi 使用ZLIB对datasetProvider.data数据包进行压缩传输的测试

delphi 使用ZLIB对datasetProvider.data数据包进行压缩传输的测试uses Datasnap.DSIntf 设置ZLIB压缩等级(zcFastest表示最快的压缩速度)      ZCompre...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0277

Delphi XE2 新增 System.Zip 单元, 可用一句话压缩整个文件夹了

 单元内主要就是 TZipFile 类, 最方便使用的是它的类方法:--------------------------------------------------------------------------------TZipFile.ExtractZipFile() //解压 Zip 文件...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
04211

Delphi压缩库 ZLibEx 介绍

Daniel注:是一套不错的库,我写的这篇简短的介绍希望对大家有用^_^ZlibEx作者: brent sherwood(http://www.base2ti.com/)--------------------------------------------------------最新版下...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
03115

Delphi 对GZIP解压

呵呵,终于做出来了,有一定收获, 在算法上还是花了不少时间, 以前解gzip内容,现在是deflate,少了文件头内容,所以 用以前思路老是碰到'data error'问题。 用的是zLib控件: (http://www.2c...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
03811

delphi 文件/流的加密解密方法

(** 单元说明: 文件/流的加密解密方法(For Delphi 6-7)*** 使用说明: 此文件的代码可以直接编译使用,* 您可以根据需要编写自己的加密/解密代码.** 声 明: 以下代码属作者原创, 请转载时保留本信...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
04515

VCLZip控件的简单使用

VCLZip压缩解压文件支持winzip,下面给个简单调用的例子,控件在本站可以下载:uses VCLUnZip, VCLZip;function ComPressFile(dstFile,srcFile:string):Boolean;varvclzip:TVCLZip;beginResult:...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0395

Delphi 中压缩流和解压流的应用

软件开发者不免都要遇到压缩数据的问题!经常使用Delphi的朋友都知道,它为我们提供了两个流类(TCompressionStream和TDecompressionStream)来完成数据的压缩和解压缩,但美中不足的是,该流在...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
03214

delphi Zlib 流压缩解压

procedure UnCompressionStream(var ASrcStream:TMemoryStream); //解压缩varnTmpStream:TDecompressionStream;nDestStream:TMemoryStream;nBuf: array[1..512] of Byte;nSrcCount: integer;beg...
Top_Admin的头像-Delphi编程技巧大全Top_Admin22天前
0496