Source position: googleclassroom.pp line 510
protected procedure TName.SetfamilyName(
AIndex: Integer;
const AValue: string
); virtual;