Source position: AbArcTyp.pas line 213
type TAbArchiveItemEvent = procedure(
Sender: TObject;
Item: TAbArchiveItem
) of object;