Object <- FontDescription <- Font <- CompositeFont |
|
|
FindComponentFontRun FontDraw FontOffsets FontTotalWidth FontWidths MaximumGlyphWidth Validate |
|
Ascent Descent Height |
| Field | Type | |
|---|---|---|
| FontDescription: | fontIdentifier: | Buffer |
| fontName: | Text | |
| fontSize: | Unsigned | |
| isBold: | Boolean | |
| isItalic: | Boolean | |
| isUnderlined: | Boolean | |
| CompositeFont: | rangeTable: | Buffer |
| ascent: | SignedShort | |
| descent: | SignedShort | |
| maximumGlyphWidth: | SignedShort | |
| fontList: | ObjectList | |
| baselineAdjustments: | IntegerList |
instance CompositeFont tag; fontIdentifier: nilObject; fontName: nilObject; fontSize: 0; isBold: false; isItalic: false; isUnderlined: false; rangeTable: nilObject; ascent: 0; descent: 0; maximumGlyphWidth: 0; fontList: nilObject; baselineAdjustments: nilObject; end instance;
Define Class CompositeFont; inherits from Font; field rangeTable: Buffer; field ascent: SignedShort; field descent: SignedShort; field maximumGlyphWidth: SignedShort; field fontList: ObjectList; field baselineAdjustments: IntegerList; overrides Ascent; overrides Descent; overrides Height; overrides MaximumGlyphWidth; overrides FontDraw; overrides FontTotalWidth; overrides FontWidths; overrides FontOffsets; operation FindComponentFontRun(characters: ReadOnlyCharactersPointer; characterCount: Unsigned; var runCharacterCount: Unsigned; var baselineAdjustment: Micron): Font; #ifdef VALIDATE overrides Validate; #endif end class;