Source position: googlegenomics.pp line 1248
protected procedure TProgram.Setname(
AIndex: Integer;
const AValue: string
); virtual;