Source position: googleblogger.pp line 865
protected procedure TPostPerUserInfo.Setkind(
AIndex: Integer;
const AValue: string
); virtual;