Source position: googlespectrum.pp line 927
protected procedure TVcard.Setemail(
AIndex: Integer;
const AValue: TVcardTypedText
); virtual;