Source position: googlemirror.pp line 475
protected procedure TSubscription.Setcollection(
AIndex: Integer;
const AValue: string
); virtual;