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