Source position: googleblogger.pp line 235
protected procedure TBlogPerUserInfo.SethasAdminAccess(
AIndex: Integer;
const AValue: Boolean
); virtual;