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