home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / intuition / cghooks.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  853 b   |  33 lines
  1. {$if not def INTUITION_CGHOOKS_H} CONST INTUITION_CGHOOKS_H=0;
  2.  
  3. { *********************************************************************
  4.   ** KickPascal-Include-Datei "intuition/cghooks.h" zu Kickstart 3.0 **
  5.   ********************************************************************* }
  6.  
  7. TYPE p_GadgetInfo = ^GadgetInfo;
  8. TYPE p_PGX = ^PGX;
  9.  
  10. {$if not def INTUITION_INTUITION_H;incl "intuition/intuition.h";endif}
  11.  
  12. TYPE GadgetInfo = RECORD
  13.  gi_Screen    : p_Screen;
  14.  gi_Window    : p_Window;
  15.  gi_Requester : p_Requester;
  16.  gi_RastPort  : p_RastPort;
  17.  gi_Layer     : p_Layer;
  18.  gi_Domain    : IBox;
  19.  gi_Pens      : RECORD
  20.                  DetailPen : Byte;
  21.                  BlockPen  : Byte;
  22.                 END;
  23.  gi_DrInfo    : p_DrawInfo;
  24.  gi_Reserved  : ARRAY[0..5] OF Long;
  25. END;
  26.  
  27. TYPE PGX = RECORD
  28.  pgx_Container : IBox;
  29.  pgx_NewKnob   : IBox;
  30. END;
  31.  
  32. {$endif}
  33.