ThtFontInfo

type ThtFontInfo = record

  iName: ThtString;

  iSize: Double;

  iStyle: TFontStyles;

  iColor: TColor;

  ibgColor: TColor;

  iCharSet: TFontCharSet;

  iCharExtra: Variant;

  iWeight: Integer;

end;