home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / intuition / classusr.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  1.8 KB  |  89 lines
  1. {$if not def INTUITION_CLASSUSR_H} CONST INTUITION_CLASSUSR_H=0;
  2.  
  3. { **********************************************************************
  4.   ** KickPascal-Include-Datei "intuition/classusr.h" zu Kickstart 3.0 **
  5.   ********************************************************************** }
  6.  
  7. TYPE Object = Long;
  8. TYPE p_Object = ^Long;
  9. TYPE ClassID = Str;
  10. TYPE p_opSet = ^opSet;
  11. TYPE p_opUpdate = ^opUpdate;
  12. TYPE p_opGet = ^opGet;
  13. TYPE p_opAddTail = ^opAddTail;
  14. TYPE p_opMember = ^opMember;
  15.  
  16. {$if not def UTILITY_HOOKS_H;incl "utility/hooks.h";endif}
  17.  
  18.  
  19. Msg = RECORD
  20.  MethodID : Long
  21. END;
  22.  
  23.  
  24. CONST
  25.  ROOTCLASS     = "rootclass";
  26.  IMAGECLASS    = "imageclass";
  27.  FRAMEICLASS   = "frameiclass";
  28.  SYSICLASS     = "sysiclass";
  29.  FILLRECTCLASS = "fillrectclass";
  30.  GADGETCLASS   = "gadgetclass";
  31.  PROPGCLASS    = "propgclass";
  32.  STRGCLASS     = "strgclass";
  33.  BUTTONGCLASS  = "buttongclass";
  34.  FRBUTTONCLASS = "frbuttonclass";
  35.  GROUPGCLASS   = "groupgclass";
  36.  ICCLASS       = "icclass";
  37.  MODELCLASS    = "modelclass";
  38.  ITEXTICLASS   = "itexticlass";
  39.  POINTERCLASS  = "pointerclass";
  40.  
  41.  
  42. CONST
  43.  OM_Dummy     = $100;
  44.  OM_NEW       = $101;
  45.  OM_DISPOSE   = $102;
  46.  OM_SET       = $103;
  47.  OM_GET       = $104;
  48.  OM_ADDTAIL   = $105;
  49.  OM_REMOVE    = $106;
  50.  OM_NOTIFY    = $107;
  51.  OM_UPDATE    = $108;
  52.  OM_ADDMEMBER = $109;
  53.  OM_REMMEMBER = $10A;
  54.  
  55. TYPE opSet = RECORD
  56.  MethodID     : Long;
  57.  ops_AttrList : p_TagItem;
  58.  ops_GInfo    : p_GadgetInfo;
  59. END;
  60.  
  61. TYPE opUpdate = RECORD
  62.  MethodID     : Long;
  63.  opu_AttrList : p_TagItem;
  64.  opu_GInfo    : p_GadgetInfo;
  65.  opu_Flags    : Long;
  66. END;
  67.  
  68. CONST OPUF_INTERIM = $1;
  69.  
  70. TYPE opGet = RECORD
  71.  MethodID    : Long;
  72.  opg_AttrID  : Long;
  73.  opg_Storage : Ptr;
  74. END;
  75.  
  76. TYPE opAddTail = RECORD
  77.  MethodID  : Long;
  78.  opat_List : p_List;
  79. END;
  80.  
  81. TYPE opMember = RECORD
  82.  MethodID    : Long;
  83.  opam_Object : p_Object;
  84. END;
  85.  
  86. TYPE opAddMember = opMember;
  87.  
  88. {$endif}
  89.