TFamilyCollectionItem

type TFamilyCollectionItem = class(TCustomFamilyCollectionItem)

protected

  function GetFontByIndex(); override;

  function GetFontByStyles();

  function GetFontIndexByStyles();

  function GetStyle(); override;

  procedure AddStyle();

  function RemoveStyle();

  function GetStyles; override;

  function GetFamilyName; override;

  function GetFontCount; override;

  function GetStyleCount; override;

  procedure RebuildStyleList();

public

  constructor Create();

  procedure AddFont();

  function RemoveFont();

  function GetFont();

  function GetFontIndex();

  function HasStyle(); override;

end;

TFamilyCollectionItem

TCustomFamilyCollectionItem

TObject