Source position: googlepeople.pp line 171
protected procedure TPerson.Setinterests(
AIndex: Integer;
const AValue: TPersonTypeinterestsArray
); virtual;