Source position: googlespectrum.pp line 926
protected procedure TVcard.Setadr(
AIndex: Integer;
const AValue: TVcardAddress
); virtual;