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