TBitmapFont

type TBitmapFont = class

public

const

  DefaultImageExtension = '.png'

  DefaultXMLExtension = '.xml'

  DefaultBinaryExtension = '.font'

public

type

  TStyleTags = TStyleTags;

  TKernings = TKernings;

  TTextEntryEvent = procedure(

  const Sender: TObject;

  const FontImage: TAtlasImage;

  const SourceRect: TIntRect;

  const DestRect: TFloatRect;

  const Color: TColorRect;

  const UserContext: Pointer

);

protected

  FSize: TPoint2i;

  FImage: TAtlasImage;

  FEntries: array [0..MaxEntriesCount-1] of TLetterEntry;

  function LoadEntriesFromXMLStream();

  function LoadEntriesFromXMLFile();

  function LoadEntriesFromXMLAsset();

public

  constructor Create();

  destructor Destroy; override;

  function DrawTextCustom();

  procedure DrawText();

  procedure DrawTextAligned();

  procedure DrawTextCentered();

  function TextExtent();

  function TextWidth();

  function TextHeight();

  function TextExtentInt();

  function TextWidthInt();

  function TextHeightInt();

  procedure DrawTextBox();

  procedure TextRects();

  function LoadFromBinaryStream();

  function LoadFromBinaryFile();

  function LoadFromBinaryAsset();

  function LoadFromXMLStream();

  function LoadFromXMLFile();

  function LoadFromXMLAsset();

  function LoadSystemFont();

  property Device: TCustomDevice; [r]

  property SubscribedTextures: Boolean; [r]

  property Name: StdString; [rw]

  property Kernings: TKernings; [r]

  property Canvas: TCustomCanvas; [rw]

  property Image: TAtlasImage; [r]

  property StyleTags: TStyleTags; [rw]

  property Size: TPoint2i; [r]

  property Width: VectorInt; [r]

  property Height: VectorInt; [r]

  property WordSeparators: UniString; [rw]

  property ParagraphSeparators: UniString; [rw]

  property Scale: VectorFloat; [rw]

  property Interleave: VectorFloat; [rw]

  property SpaceWidth: VectorFloat; [rw]

  property VerticalSpace: VectorFloat; [rw]

end;

TBitmapFont

TObject