TFontCollectionItem

type TFontCollectionItem = class(TCustomFontCollectionItem)

protected

  function GetFilename; override;

  function GetBold; override;

  function GetInformation(); override;

  function GetItalic; override;

  function GetStyleCount; override;

  function GetStyles; override;

  function GetStyle(); override;

  function GetVersionNumber; override;

  procedure NotifyDestroy; override;

  procedure Init;

public

  constructor Create();

  destructor Destroy; override;

  function HasStyle(); override;

  property Information []: string; [rw]

  property VersionNumber: string; [rw]

  function CreateFont; override;

  function QueryFace(); override;

  procedure ReleaseFace(); override;

  property UsePostscriptStyle: Boolean; [rw]

end;

TFontCollectionItem

TCustomFontCollectionItem

TObject