Source position: tiCompress.pas line 67
function tiCompressString(
const AString: string;
const pCompress: string = cgsCompressZLib
):string;