home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / diskfont / glyph.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  1.1 KB  |  45 lines
  1. {$if not def DISKFONT_GLYPH_H} CONST DISKFONT_GLYPH_H=0;
  2.  
  3. { *******************************************************************
  4.   ** KickPascal-Includes-Datei "diskfont/glyph.h" zu Kickstart 3.0 **
  5.   ******************************************************************* }
  6.  
  7. {$if not def EXEC_LIBRARIES_H;incl "exec/libraries.h";endif}
  8. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  9.  
  10. TYPE
  11.  p_GlyphEngine = ^GlyphEngine;
  12.  GlyphEngine = RECORD
  13.   gle_Library   : p_Library;
  14.   gle_Name      : Str;
  15.   { *** private Felder *** }
  16.  end;
  17.  
  18.  FIXED = LONG;
  19.  
  20.  p_GlyphMap = ^GlyphMap;
  21.  GlyphMap = RECORD
  22.   glm_BMModula  : Word;
  23.   glm_BMRows    : Word;
  24.   glm_BlackLeft : Word;
  25.   glm_BlackTop  : Word;
  26.   glm_BlackWidth: Word;
  27.   glm_BlackHeight: Word;
  28.   glm_XOrigin   : FIXED;
  29.   glm_YOrigin   : FIXED;  
  30.   glm_X0        : Integer;
  31.   glm_Y0        : Integer;
  32.   glm_X1        : Integer;
  33.   glm_Y1        : Integer;
  34.   glm_Width     : FIXED;
  35.   glm_BitMap    : ^Byte;
  36.  end;
  37.  
  38.  p_GlyphWidthEntry=^GlyphWidthEntry;
  39.  GlyphWidthEntry = RECORD
  40.   gwe_Code      : Word;
  41.   gwe_Width     : FIXED;
  42.  end;
  43.  
  44. {$endif}
  45.