Source position: AbArcTyp.pas line 241
type TAbProgressEvent = procedure(
Progress: Byte;
var Abort: Boolean
) of object;