delphi 压缩

delphi 压缩ZLib

system.ZLib http://docwiki.embarcadero.com/CodeExamples/Berlin/en/ZLibCompressDecompress_(Delphi) 还不如万老师的例子正确,官方的例子是 http://www.cnblogs.com/del/archive/2008/01/01/1022539.html System.ZLib.TZCompressionStream System.ZLib.TZDecompressionStream http://d…

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

unit unzip; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Se…

DELPHI 通过ZLib来压缩文件夹 unit Unit1; interface uses ZLib, Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; const cBufferSize = $; cIdent: ] = 'zsf'; cVersion = $; cErrorIdent = -; cErrorVersion = -; type TFileH…

Delphi 解压缩 ZipForge

ZipForge http://www.componentace.com/zip_component_zip_delphi_zipforge.htm downLoad http://www.componentace.com/download/download.php?editionid=12 Example http://www.componentace.com/zip-delphi.htm c++builder.Delphi 压缩文件 ZipForge is a fast and powerf…

Zlib压缩算法在Java与Delphi间交互实现（压缩XML交互）

一个典型应用中,使用delphi作为客户端,J2EE服务端,两者之间用XML作为数据交换,为了提高效率,对XML数据进行压缩,为此需要找到一种压缩/解压算法能够两个平台之间交互处理,使用ZLIB算法就是一个不错的解决方案. 1.JAVA实现在JDK中,在java.util.zip包中已经内置了ZLIB的实现,示例代码如下: 1//解压 2 public String decompressData(String encdata) { 3 try { 4 ByteArrayOutputStream…

delphi GDI 图片压缩代码据说是位图缩放保持原图视觉效果最好的算法

delphi 图片压缩代码据说是位图缩放保持原图视觉效果最好的算法若有更好的,请大神留言我也学习下,感谢! uses WinAPI.GDIPAPI, WinAPI.GDIPOBJ; var Bitmap1: TGPBitmap; Bitmap2: TBitmap; Graphic: TGPGraphics;begin Bitmap1 := TGPBitmap.Create('test.bmp'); // bmp, gif, jpeg, png... Bitmap2 := TBit…

使用zlib来压缩文件-用delphi描述

今天用到压缩文件的问题,找了一些网上的资料,后来发现了delphi自身所带的zlib单元,根据例子稍微改变了一些,使它能够符合所有的格式. 使用时,需要Zlib.pas和 Zlibconst.pas两个单元文件,这两个文件保存在 Delphi 5.0安装光盘上 InfoExtrasZlib目录下,此外,在 InfoExtrasZlibObj目录中还保存了 Zlib.pas单元引用的 Obj文件,把这个目录拷贝到delphi的lib下,即可. 原来提供的例子是抓计算机屏幕,现在改成文件流,适应所有…

用DELPHI 开发压缩、解压、自解压、加密

引言:在日常中,我们一定使用过WINZIP.WINRAR这样的出名的压缩软件,就是我们开发软件过程中不免要遇到数据加密.数据压缩的问题!本文中就这一技术问题展开探讨,同时感谢各位网友的技巧,在我每次面对问题要解决的时候,是你们辛苦地摸索出来的技巧总是让我豁然开朗,问题迎刃而解.本篇文章主要是运用DELPH的强大的流处理方面的技巧来实现的数据加密压缩,并用于实际的软件程序开发中,将我个人的心得.开发经验写出来与大家分享. 1. 系统功能1).数据压缩使用DELPHI提供的两个流类(TCompr…

Delphi XE2 新增 System.Zip 单元，压缩和解压缩文件

Delphi XE2 新增 System.Zip 单元, 可用一句话压缩整个文件夹了单元内主要就是 TZipFile 类, 最方便使用的是它的类方法: TZipFile.ExtractZipFile() //解压 Zip 文件到指定文件夹 TZipFile.IsValid() //判断指定文件是否是有效的 Zip 文件 TZipFile.ZipDirectoryContents() //压缩指定路径下的所有文件测试: uses System.Zip; { 把 C:\Temp\TestDir…

Delphi Base64编码/解码及ZLib压缩/解压

最近在写的程序与SOAP相关,所以用到了一些Base64编码/解码及数据压缩/解压方面的知识. 在这里来作一些总结: 一.Base64编码/解码一般用到的是Delphi自带的单元EncdDecd,当然还有第三方提供的单元或控件,其中我所接触到的认为比较好的有Indy的TIdMimeEncode / TIdMimeDecode组件,以及RjMime单元. 在这里主要想讲讲如何才能获得最好的编码/解码性能,EncdDecd提供了EncodeStream/DecodeString, En…

Delphi - Windows系统下，Delphi调用API函数和7z.dll动态库，自动把文件压缩成.tar.gz格式的文件

项目背景应欧美客户需求,需要将文件压缩成.tar.gz格式的文件,并上传给客户端SFTP服务器. 你懂的,7-Zip软件的显著特点是文件越大压缩比越高,在Linux系统上相当于我们Windows系统上WinRAR或者好压软件一样的存在. 7-Zip软件下载与安装网上下载相关安装包并完成安装,找到安装目录,复制7z.dll文件到D盘. .bat文件的制作通过7-Zip软件使用手册了解到,通过动态命令行调用7z.dll可以把文件压缩成.tar.gz格式的,实际上是先将文件压缩成.tar格式的文…

Delphi Base64编码_解码及ZLib压缩_解压（转）

最近在写的程序与SOAP相关,所以用到了一些Base64编码/解码及数据压缩/解压方面的知识. 在这里来作一些总结:一.Base64编码/解码一般用到的是Delphi自带的单元EncdDecd,当然还有第三方提供的单元或控件,其中我所接触到的认为比较好的有Indy的TIdMimeEncode / TIdMimeDecode组件,以及RjMime单元. 在这里主要想讲讲如何才能获得最好的编码/解码性能,EncdDecd提供了EncodeStream/DecodeString, EncodeStr…

delphi 处理图片(剪切，压缩)

剪切bmp:效果为指定的rect大小,若图片比rect小,则会放大. 都要uses Vcl.Imaging.jpeg; 需要注意的是FMX里也需要jpeg的支持,虽然没引用编译器不会报错,但用到jpg时会报内存错误. procedure TForm1.Button1Click(Sender: TObject); var Bitmap: TBitmap; MyRect1, MyOther: TRect; begin if self.OpenDialog1.Execute then begin My…

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

内主要就是 TZipFile 类, 最方便使用的是它的类方法: TZipFile.ExtractZipFile() //解压 Zip 文件到指定文件夹 TZipFile.IsValid() //判断指定文件是否是有效的 Zip 文件 TZipFile.ZipDirectoryContents() //压缩指定路径下的所有文件测试: uses System.Zip; { 把 C:\Temp\TestDir 下的所有文件压缩到 C:\Temp\Test.zip } procedure TForm1…

关于 Delphi 中流的使用(7) 压缩与解压缩(TCompressionStream、TDecompressionStream)

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); pro…

delphi并行压缩

real case test MM parallel 4x scalable (i7 6700)(on the newer processors will be linear) I did a small test with real code scenario,look at parallel zlib with my patch, zcompress loop 1000 of a 1100KB text file: uses System.Zlib; threadvar INS: TMemo…

学习笔记：7z在delphi的应用

最近做个发邮件的功能,需要将日志文件通过邮件发送回来用于分析,但是日志文件可能会超级大,测算下来一天可能会有800M的大小.所以压缩是不可避免了,delphi中的默认压缩算法整了半天不太好使,就看了看7z,在windows下有dll那么就用它吧. 下载7z.dll,还有一个delphi的开发sdk文件,sevenzip.pas.有这两个就可以了. 压缩使用超级简单 procedure TForm1.Button1Click(Sender: TObject); var Arch: I7zOutA…

Delphi中ExtractFilePath、ParamStr以及更多文件/目录操作涉及的函数。附加对应的例子

先介绍ExtractFilePath和ParamStr ParamStr 该函数的原型是:function paramstr(i: Integer): String; 对于任何的application,paramstr(0)都默认代表的是应用程序的绝对路径.假如你这个编译号的exe 文件在 d:\delphi下,名字叫做 project1.exe.那么在该应用程序中paramstr(0)返回:d:\delphi\project1.exe.这个值是变的,exe程序在哪,这个值就变为哪儿. 那么有…

转：Delphi 6 实用函数

来自: daocaoren0824, 时间: -- ::, ID: 再给你一份程序员实用函数 {▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎} {▎ ▎} {▎ 大家都是程序员没有必要重复一些无聊的事情我的这些函数能给大家带来方便 ▎} {▎ 如果觉得还一般请关注 WWW.cdsunco.com/www.ccemove.com QQ:35013354 ▎} {▎ 系统公用函数及过程 ▎} {▎ ▎} {▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎▎…

ArcEngine地图窗口指定区域导出指定DPI多格式---delphi/C#实现

delphi/C#实现,其他语言稍微改下就行了.AE的编码各个语言都差不多,这里也没用到某一语言的特性. 函数特点: 1.可以精确导出指定范围的图形要素 2.支持多格式.TIF, .EMF,.GIF,.PDF,.PNG,.SVG,.AI,.EPS,.jpg等 3.Tif格式导出时支持坐标信息导出,支持压缩格式选择 delphi 版: {海龙 created 功能说明:指定地图窗口指定区域裁图参数说明: 指定地图窗口pMap 指定范围裁图pExtent,如某一图形的envolope或ma…

Delphi 控件大全

delphi 控件大全(确实很全) delphi 控件查询:http://www.torry.net/ http://www.jrsoftware.org Tb97 最有名的工具条(ToolBar)控件库,仿Office97,如TDoCk97,TToolBar97,TEdit97,TToolWindow97等. http://www.fltvu.com/jiaocheng/chenxu1/delphi/vCl/index.htm http://www.delphiarea.com/produ…

delphi中midas是什么

Delphi中MIDAS到底是什么呢?和他相关组件是什么呢? MIDAS(Multitiered Distributed Application Services)多层分布式应用服务. Delphi所提出的Multi-Tier结构是把原来的Two-Tier前台应用程序内的dbExpress,ADO,BDE,SQL Link,DataMoule,拿到另外一台NT服务器(就是所谓的应用程序服务器),而前台程序只剩下一个可执行文档及MIDAS.DLL,而移到NT服务器上的DataMoule则变…

DELPHI XE5开发WEB服务器及安卓手机客户端

Xe5开发web服务端和手机客户端 ------------------------------------- Delphi xe5作为最新开发利器,就类似如当年的DELPHI,功能强大,快发速度快,把VS2012远远甩在后面.下面以一个小例作为您开启新的历程: 建立一个webservices stand-alone vcl application 作为手机访问的服务端 1.new->other->webservices 2.选择 stand-alone vcl application 3.…

delphi 控件大全（确实很全）

delphi 控件查询:http://www.torry.net/ http://www.jrsoftware.org Tb97 最有名的工具条(ToolBar)控件库,仿Office97,如TDoCk97,TToolBar97,TEdit97,TToolWindow97等. http://www.fltvu.com/jiaocheng/chenxu1/delphi/vCl/index.htm http://www.delphiarea.com/produCts/ http://neftali.…

【delphi 压缩】的更多相关文章