Source position: googlewebfonts.pp line 50
protected procedure TWebfont.Setcategory(
AIndex: Integer;
const AValue: string
); virtual;