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