Source position: googleblogger.pp line 238
protected procedure TBlogPerUserInfo.Setrole(
AIndex: Integer;
const AValue: string
); virtual;