Source position: chmfilewriter.pas line 43
type TChmProgressCB = procedure(
Project: TChmProject;
CurrentFile: string
) of object;