TAggFPFont

type TAggFPFont = class(TFPCustomFont)

protected

  procedure DoCopyProps(); override;

  procedure SetFPColor(); override;

  procedure SetAggColor(); virtual;

  procedure SetAggAlignX(); virtual;

  procedure SetAggAlignY(); virtual;

  procedure SetAggAngle(); virtual;

  procedure SetAggFlipY(); virtual;

  procedure SetAggHeight(); virtual;

  procedure SetAggHinting(); virtual;

  procedure SetSize(); override;

public

  constructor Create; override;

  procedure LoadFromFile();

  function AggHeightToSize(); virtual;

  function SizeToAggHeight(); virtual;

  property AggColor: TAggColor; [rw]

  property AggAlignX: TAggTextAlignment; [rw]

  property AggAlignY: TAggTextAlignment; [rw]

  property AggHinting: Boolean; [rw]

  property AggAngle: Double; [rw]

  property AggCache: TAggFontCacheType; [r]

  property AggHeight: Double; [rw]

  property AggFlipY: Boolean; [rw]

  property AggUseOnlyFont: Boolean; [rw]

  property Bold;

  property Italic;

  property Underline;

  property StrikeThrough;

end;

TAggFPFont

TObject