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