Source position: chmwriter.pas line 125
public procedure TITSFWriter.AddStreamToArchive(
AFileName: string;
APath: string;
AStream: TStream;
Compress: Boolean = True
);