Source position: googlebooks.pp line 2052
protected procedure TVolumeTypeaccessInfo.SetquoteSharingAllowed(
AIndex: Integer;
const AValue: Boolean
); virtual;