Source position: IdZLib.pas line 133
procedure CompressStream(
InStream: TStream;
OutStream: TStream;
level: TCompressionLevel;
StreamType: TZStreamType
);