TNewTextMetric

type TNewTextMetric = record

  tmHeight: LongInt;

  tmAscent: LongInt;

  tmDescent: LongInt;

  tmInternalLeading: LongInt;

  tmExternalLeading: LongInt;

  tmAveCharWidth: LongInt;

  tmMaxCharWidth: LongInt;

  tmWeight: LongInt;

  tmOverhang: LongInt;

  tmDigitizedAspectX: LongInt;

  tmDigitizedAspectY: LongInt;

  tmFirstChar: AnsiChar;

  tmLastChar: AnsiChar;

  tmDefaultChar: AnsiChar;

  tmBreakChar: AnsiChar;

  tmItalic: Byte;

  tmUnderlined: Byte;

  tmStruckOut: Byte;

  tmPitchAndFamily: Byte;

  tmCharSet: Byte;

  ntmFlags: DWORD;

  ntmSizeEM: UINT;

  ntmCellHeight: UINT;

  ntmAvgWidth: UINT;

end;