[Lazarus] FPC, gzip and stream

Darius Blaszyk dhkblaszyk at zeelandnet.nl
Sat Feb 4 12:49:41 CET 2012


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
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus





More information about the Lazarus mailing list