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