Zipar sem ZipMaster

Question

Alguem pode me dizer algum outro componente q pra compactar arquivos q n�o seja o ZipMaster???
Pq esse precisa das dll�s e queria uma q n�o tivesse necessitasse de nenhum outro arquivo...

Se alguem souber

Alan Vieceli

Nildo · Answer

Olha, talvez meu artigo o ajude: //www.clubedelphi.net/artigos/U_DLLnoDelphi.asp...

Nerdex · Answer

Esse � meu artigo Nildo!... v� se gosta:

N�o me perguntem o porqu�, mas tenho um certo fac�nio por compress�o de dados, sendo que j� testei v�rios componentes. Hoje n�o uso nenhum deles e sim um pequen�ssimo arquivo da pr�pria RTL do Delphi chamado zLib.pas. Fiquei surpreso com os resultados de efici�ncia, performance e taxas de compress�o obtidos nos meus testes, onde equipara-se ao uso do compressor UPX.exe (algor�tmo de compress�o NRV criado por Markus F.X.J. Oberhumer e L�szl� Moln�r). Bem... agora vamos ver como � f�cil, simples e leve sua implementa��o usando a zLib: Insira zLib no Uses da sua Unit... procedure TForm1.Compress�oClick(Sender: TObject); var FileIni, FileOut: TFileStream; Zip: TCompressionStream; begin FileIni:=TFileStream.Create(�C:\pasta\...arquivo a ser comprimido...�, fmOpenRead and fmShareExclusive); FileOut:=TFileStream.Create(�C:\pasta\...arquivo comprimido...�, fmCreate or fmShareExclusive); Zip:=TCompressionStream.Create(clMax, FileOut); Zip.CopyFrom(FileIni, FileIni.Size); Zip.Free; FileOut.Free; FileIni.Free; end; procedure TForm1.Descompress�oClick(Sender: TObject); var FileIni, FileOut: TFileStream; DeZip: TDecompressionStream; i: Integer; Buf: array[0..1023]of Byte; begin FileIni:=TFileStream.Create(�C:\pasta\...arquivo comprimido...�, fmOpenRead and fmShareExclusive); FileOut:=TFileStream.Create(�C:\pasta\...arquivo descomprimido...�, fmCreate or fmShareExclusive); DeZip:=TDecompressionStream.Create(FileIni); repeat i:=DeZip.Read(Buf, SizeOf(Buf)); if i <> 0 then FileOut.Write(Buf, i); until i <= 0; DeZip.Free; FileOut.Free; FileIni.Free; end; Dependendo da tua necessidade... poder� adapt�-lo para que execute a compress�o e descompress�o de pastas inteiras e tamb�m que realize um teste de verifica��o na integridade dos arquivos com o aux�lio de uma tabela CRC 32. Ricardo Bastos Campos Tec em Proc de Dados e Acad. em Sist de Informa��o Santa Maria - RS ricbcampos@ubbi.com.br

Lucaniasalvatore · Answer

Bom dia, alansvieceli.Vc n�o precisa usar necessariamente as dll�s. O ZipMaster 1.78 vem com um mini-aplicativo �MAKEdllRes� para vc criar um arquivo �ResDll.res� das dll�s.Dessa forma vc apenas inclui:{$R resdlls.res}e voil�...o endere�o: [url]//www.delphizip.net/[/url]o aplicativo ficar� na subpasta Tools.boa programa��oLucania Salvatore...

Nildo · Answer

[quote:6bc2deff50=�NerdeX�]Esse � meu artigo Nildo!... v� se gosta[/quote:6bc2deff50]Muito bom! Parabens!Dois artigos diferentes para apenas uma solu��o! Eeeeta esse forum ta ficando cada vez com maior qualidade!...

Madrick · Answer

De uma olhada ai...//forum.devmedia.com.br/viewtopic.php?t=60429&highlight=zlib&sid=4a78b63e9ac7fb3bfe1eb18a558cc86f...

Rfpsatin · Answer

Salve Gente...como fa�o pra descompactar um arquivo(usando zLib.pas) compactado pelo winzip, p.ex.?ta dando erro, acusa erro!valeu...

Gandalf.nho · Answer

[quote:deb70fe7ad=�rfpsatin�]Salve Gente...como fa�o pra descompactar um arquivo(usando zLib.pas) compactado pelo winzip, p.ex.?ta dando erro, acusa erro!valeu[/quote:deb70fe7ad]Pelo que sei zLib n�o permite descompactar arquivos padr�o ZIP. Vc ter� que usar um padr�o compat�vel com ZIP...

Rfpsatin · Answer

[quote:8d3e33e815=�gandalf.nho�][quote:8d3e33e815=�rfpsatin�]Salve Gente...como fa�o pra descompactar um arquivo(usando zLib.pas) compactado pelo winzip, p.ex.?ta dando erro, acusa erro!valeu[/quote:8d3e33e815]Pelo que sei zLib n�o permite descompactar arquivos padr�o ZIP. Vc ter� que usar um padr�o compat�vel com ZIP[/quote:8d3e33e815]Pra mim isso � um problema, pq nao posso agregar um componente neste projeto!Vc ou algu�m tem alguma rotina, unit, algo simples que pudesse disponibiliar sem ser um componente?muito obrigado!...

Nildo · Answer

[quote:aca05651eb=�rfpsatin�]Pra mim isso � um problema, pq nao posso agregar um componente neste projeto![/quote:aca05651eb]Qual a diferen�a de agregar um componente e uma Unit? Voc� pode colocar as Units do ZipMaster junto com seu projeto, mas sem ter que instalar o TZipMaster, logo voc� os cria din�micamente...

Rfpsatin · Answer

[quote:dc1bba7cd5=�nildo�][quote:dc1bba7cd5=�rfpsatin�]Pra mim isso � um problema, pq nao posso agregar um componente neste projeto![/quote:dc1bba7cd5]Qual a diferen�a de agregar um componente e uma Unit? Voc� pode colocar as Units do ZipMaster junto com seu projeto, mas sem ter que instalar o TZipMaster, logo voc� os cria din�micamente[/quote:dc1bba7cd5]legal, legal, legal....s�o muitas units?vc pode me mandar!rfpsatin@yahoo.com.br...

Nildo · Answer

Baixa deste site: //www.delphizip.net/Joga as units dentro da pasta do seu projeto (de preferencia), vincula as units ao seu projeto, declara elas no seu Uses e crie-os dinamicamente....

Rfpsatin · Answer

uia ki ki eu achei  :shock:  :shock:  :shock:  :shock: //www.delphi32.com/vcl/3173/download,xid,3173.aspgostei muito....

Dpinho · Answer

Quero utilizar a zLib, ate ja testei e gostei da taxa de compacta��o e a facilidade de uso, Gostaria de saber se tem jeito de compactar todos os arquivos de uma pasta, utilizando o path dela ou usar mascaras *.* e ao descompactar retonar para o path original

Nerdex · Answer

[quote:4e27b73f93]Quero utilizar a zLib, ate ja testei e gostei da taxa de compacta��o e a facilidade de uso, Gostaria de saber se tem jeito de compactar todos os arquivos de uma pasta, utilizando o path dela ou usar mascaras *.* e ao descompactar retonar para o path original[/quote:4e27b73f93][list:4e27b73f93]Sim... naturalmente existe a possibilidade... para isto veja [url=//cc.borland.com/ccweb.exe/listing?id=21894]este arquivo aqui do Code Central da Borland.[/url][u:4e27b73f93]Nome do arquivo[/u:4e27b73f93]:A single unit adding Zip file handling to Delphi 1.1 []�s[/list:u:4e27b73f93]...

Eniorm · Answer

Ressucitando esse post......Tem como limitar o tamanho do arquivo compactado usando o zLibTipo, tenho um arquivo que, ap�s compactado ter� 5 megas, quero que o processo de compacta��o gere 5 arquivos com 1 mega cada.Tem como?...

F�rum Zipar sem ZipMaster #276230