Source position: googlepeople.pp line 167
protected procedure TPerson.Setaddresses(
AIndex: Integer;
const AValue: TPersonTypeaddressesArray
); virtual;