Source position: googlepeople.pp line 175
protected procedure TPerson.SetrelationshipInterests(
AIndex: Integer;
const AValue: TPersonTyperelationshipInterestsArray
); virtual;