O ZLib na verdade é uma Unit do próprio Delphi que manipula arquivos compactados. Nas edições 93 e 94 da revista ClubeDelphi saíram dos artigos sobre o assunto do Gustavo Chaurais.
Olhem esses tópicos http://forum.devmedia.com.br/viewtopic.php?t=61329&highlight=zlib http://forum.devmedia.com.br/viewtopic.php?t=75490&highlight=zlib -- Boa Leitura, Adriano Santos Development Manager SoftPark Editor Técnico Revistas ClubeDelphi e WebMobile www.delphitodelphi.blogspot.com www.adrianosantos.pro.br www.devmedia.com.br Rubem Nascimento da Rocha respondeu: > > > Poste o link para que outros colegas possam fazer uso da mesma dica! É > interessante! > Sds. > > ________________________________ > To: [email protected] <mailto:delphi-br%40yahoogrupos.com.br> > From: [EMAIL PROTECTED] <mailto:fellipeh%40gmail.com> > Date: Sat, 16 Aug 2008 08:21:41 -0300 > Subject: Re: [delphi-br] Compactar arquivo pelo delphi, sem usar > componentes > > Rubem, achei um topico do amigo NerdeX na ClubeDelphi, que é bem parecido > com o PasLib, e usa somente a unit ZLib... e funcionou perfeito, > achava que > tinha que descomprimir no winzip, por ser zip, mas como vc mencionou, uma > coisa é comprimir, outras é comprimir pro winzip reconhcer...funcionou > perfeitamente... > > []s > > 2008/8/15 Rubem Nascimento da Rocha <[EMAIL PROTECTED] > <mailto:djpardalrocha%40hotmail.com>> > > > > > Segundo os idealizadores da PasZLib, que cheguei a mencionar no meu > > penúltimo post, a mesma se propõe a gerar arquivos .ZIP usando o > padrão de > > compactação que vêm com o Delphi, e que está encapsulado na unit ZLib. > > > > Sds. > > > > ________________________________ > > To: [email protected] > <mailto:delphi-br%40yahoogrupos.com.br> > > From: [EMAIL PROTECTED] <mailto:danbastos%40gmail.com> > > Date: Fri, 15 Aug 2008 18:51:47 -0300 > > Subject: Re: [delphi-br] Compactar arquivo pelo delphi, sem usar > > componentes > > > > Nativo do delphi acho que não tem, mas se mesmo assim não quiser usar > > componentes de terceiros, pode usar um compactador por linha de > comando. O > > 7z é uma opção neste caso, principalmente por ser freeware. > > Alem disso, o próprio xp tem recursos para compactação de arquivos no > > formato ZIP. Este último, é visível pela opção "enviar para" do seu > > Explorer. > > > > 2008/8/15 Rubem Nascimento da Rocha <[EMAIL PROTECTED] > <mailto:djpardalrocha%40hotmail.com> > >> > > > >> > >> O nome é Rubem! > >> > >> Sds. > >> > >> ________________________________ > >> To: [email protected] > <mailto:delphi-br%40yahoogrupos.com.br> > >> From: [EMAIL PROTECTED] <mailto:fellipeh%40gmail.com> > >> Date: Fri, 15 Aug 2008 16:37:58 -0300 > >> Subject: Re: [delphi-br] Compactar arquivo pelo delphi, sem usar > >> componentes > >> > >> Valeu Rubens... estava tentando usar o zlib... > >> > >> []s > >> > >> 2008/8/15 Rubem Nascimento da Rocha <[EMAIL PROTECTED] > <mailto:djpardalrocha%40hotmail.com> > >>> > >> > >>> > >>> Procure tb, na Internet (Google, Altavista, etc.), por PasZLib! > >>> > >>> > >>> Boa sorte. > >>> Sds. > >>> > >>> ________________________________ > >>> To: [email protected] > <mailto:delphi-br%40yahoogrupos.com.br> > >>> From: [EMAIL PROTECTED] <mailto:djpardalrocha%40hotmail.com> > >>> Date: Fri, 15 Aug 2008 19:21:41 +0000 > >>> Subject: RE: [delphi-br] Compactar arquivo pelo delphi, sem usar > >>> componentes > >>> > >>> > >>> Uma coisa é compactar, outra coisa é gerar o formato da compactação de > >>> forma que o WinZip (ou similar!) consiga reconhecê-lo. > >>> > >>> Dica: http://cc.codegear.com/Item/17665 > <http://cc.codegear.com/Item/17665> (para acessar o link, vc tem > > que > >>> ser registrado no site!) > >>> > >>> Boa sorte. > >>> Sds. > >>> > >>> ________________________________ > >>>> To: [email protected] > <mailto:delphi-br%40yahoogrupos.com.br> > >>>> From: [EMAIL PROTECTED] <mailto:fellipeh%40gmail.com> > >>>> Date: Fri, 15 Aug 2008 16:04:27 -0300 > >>>> Subject: [delphi-br] Compactar arquivo pelo delphi, sem usar > > componentes > >>>> > >>>> > >>>> Olá amigos, preciso compactar e descompactar um arquivo pelo meu > >> sistema, > >>>> mas não quero usar componente para isso, procurei na net, e > encontrei o > >>>> seguinte codigo: > >>>> > >>>> InputFileName := JvFilenameEdit1.Text; > >>>> OutputFilename := ExtractFilePath(Application.Exename) + Arq + '.z'; > >>>> try > >>>> InputStream := TFileStream.Create(InputFileName, fmOpenRead); > >>>> OutputStream := TFileStream.Create(OutputFileName, fmCreate); > >>>> CompressionStream := TZCompressionStream.Create(OutputStream, > >>>> zcFastest); > >>>> CompressionStream.CopyFrom(InputStream, InputStream.Size); > >>>> finally > >>>> CompressionStream.Free; > >>>> OutputStream.Free; > >>>> InputStream.Free; > >>>> Screen.Cursor := crDefault; > >>>> end; > >>>> > >>>> Ele cria o ZIP, mas parece ser corrompido...pois não consigo > abrir ele > >> em > >>>> nenhum descompactador, e mesmo eu descompactando ele, é a mesma > coisa, > > o > >>>> arquivo fica corrompido. > >>>> > >>>> Alguém poderia me dar uma luz? > >>>> > >>>> []s > > __________________________________________________________ > Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de > relacionamentos com até 6,000 fotos! > http://www.amigosdomessenger.com.br <http://www.amigosdomessenger.com.br> > >
