Source position: googlepeople.pp line 157
protected procedure TPerson.Setgenders(
AIndex: Integer;
const AValue: TPersonTypegendersArray
); virtual;