Source position: AbArcTyp.pas line 224
type TAbArchiveItemExtractEvent = procedure(
Sender: TObject;
Item: TAbArchiveItem;
const NewName: string
) of object;