Source position: chmreader.pas line 53
type TFileEntryForEach = procedure(
Name: string;
Offset: Integer;
UncompressedSize: Integer;
Section: Integer
) of object;