Source position: googlepeople.pp line 160
protected procedure TPerson.Setevents(
AIndex: Integer;
const AValue: TPersonTypeeventsArray
); virtual;