Source position: AbArcTyp.pas line 243
type TAbRequestDiskEvent = procedure(
Sender: TObject;
var Abort: Boolean
) of object;