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