Source position: googlepeople.pp line 664
protected procedure TImClient.SetformattedProtocol(
AIndex: Integer;
const AValue: string
); virtual;