There's a gzip example program in packages/paszlib/examples Darius
On Feb 4, 2012, at 3:02 AM, silvioprog wrote: > Hello, > > How to use gzip in stream with FPC? > > Only deflate: > > (...) > var > S: string; > VDeflate: TCompressionStream; > begin > VDeflate := TCompressionStream.Create(clMax, Contents); > try > S := 'Hello'; > VDeflate.Write(Pointer(S)^, Length(S)); > finally > VDeflate.Free; > end; > end; > (...) > > But, with gzip, without sucess. :( > > Exists an 'TGZCompressionStream'? > > Thanks! > > ps. See: > http://betterexplained.com/articles/how-to-optimize-your-site-with-gzip-compression > > -- > Silvio Clécio > ==================================== > Site - <silvioprog.com.br> > LazSolutions - <code.google.com/p/lazsolutions> > ==================================== > > -- > _______________________________________________ > Lazarus mailing list > [email protected] > http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
