Source position: tiCompress.pas line 72
procedure tiDeCompressStream(
AStreamFrom: TStream;
AStreamTo: TStream;
const pCompress: string = cgsCompressZLib
);