home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / libraries / gadtools.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  6.2 KB  |  261 lines
  1. {$if not def LIBRARIES_GADTOOLS_H}CONST LIBRARIES_GADTOOLS_H=0;
  2.  
  3. { **********************************************************************
  4.   ** KickPascal-Include-Datei "libraries/gadtools.h" zu Kickstart 3.0 **
  5.   ********************************************************************** }
  6.  
  7. TYPE p_NewGadget = ^NewGadget;
  8. TYPE p_NewMenu = ^NewMenu;
  9.  
  10. {$if not def UTILITY_TAGITEM_H;incl "utility/tagitem.h";endif}
  11. {$if not def INTUITION_INTUITION_H;incl "intuition/intuition.h";endif}
  12.  
  13. CONST
  14.  GENERIC_KIND  = 0;
  15.  BUTTON_KIND   = 1;
  16.  CHECKBOX_KIND = 2;
  17.  INTEGER_KIND  = 3;
  18.  LISTVIEW_KIND = 4;
  19.  MX_KIND       = 5;
  20.  NUMBER_KIND   = 6;
  21.  CYCLE_KIND    = 7;
  22.  PALETTE_KIND  = 8;
  23.  SCROLLER_KIND = 9;
  24.  
  25.  SLIDER_KIND   = 11;
  26.  STRING_KIND   = 12;
  27.  TEXT_KIND     = 13;
  28.  
  29.  NUM_KINDS     = 14;
  30.  
  31. CONST
  32.  GADTOOLBIT  = $8000;
  33.  GADTOOLMASK = $7FFF;
  34.  
  35. CONST
  36.  ARROWIDCMP    = (IDCMP_GADGETUP or IDCMP_GADGETDOWN or IDCMP_INTUITICKS or IDCMP_MOUSEBUTTONS);
  37.  BUTTONIDCMP   = IDCMP_GADGETUP;
  38.  CHECKBOXIDCMP = IDCMP_GADGETUP;
  39.  INTEGERIDCMP  = IDCMP_GADGETUP;
  40.  LISTVIEWIDCMP = (IDCMP_GADGETUP or IDCMP_GADGETDOWN or IDCMP_MOUSEMOVE or ARROWIDCMP);
  41.  MXIDCMP       = IDCMP_GADGETDOWN;
  42.  NUMBERIDCMP   = 0;
  43.  CYCLEIDCMP    = IDCMP_GADGETUP;
  44.  PALETTEIDCMP  = IDCMP_GADGETUP;
  45.  
  46.  SCROLLERIDCMP = (IDCMP_GADGETUP or IDCMP_GADGETDOWN or IDCMP_MOUSEMOVE);
  47.  SLIDERIDCMP   = (IDCMP_GADGETUP or IDCMP_GADGETDOWN or IDCMP_MOUSEMOVE);
  48.  STRINGIDCMP   = IDCMP_GADGETUP;
  49.  
  50.  TEXTIDCMP     = 0;
  51.  
  52. TYPE NewGadget = RECORD
  53.  ng_LeftEdge   : Integer;
  54.  ng_TopEdge    : Integer;
  55.  ng_Width      : Integer;
  56.  ng_Height     : Integer;
  57.  ng_GadgetText : Str;
  58.  ng_TextAttr   : p_TextAttr;
  59.  ng_GadgetID   : Word;
  60.  ng_Flags      : Long;
  61.  ng_VisualInfo : Ptr;
  62.  ng_UserData   : Ptr;
  63. END;
  64.  
  65. CONST
  66.  PLACETEXT_LEFT  = $0001;
  67.  PLACETEXT_RIGHT = $0002;
  68.  PLACETEXT_ABOVE = $0004;
  69.  PLACETEXT_BELOW = $0008;
  70.  PLACETEXT_IN    = $0010;
  71.  
  72.  NG_HIGHLABEL    = $0020;
  73.  
  74. TYPE NewMenu = RECORD
  75.  nm_Type          : Byte;
  76.  nm_Pad           : Byte;
  77.  nm_Label         : Str;
  78.  nm_CommKey       : Str;
  79.  nm_Flags         : Word;
  80.  nm_MutualExclude : LongInt;
  81.  nm_UserData      : Ptr;
  82. END;
  83.  
  84. CONST
  85.  NM_TITLE =  1;
  86.  NM_ITEM  =  2;
  87.  NM_SUB   =  3;
  88.  NM_END   =  0;
  89.  NM_IGNORE= 64;
  90.  
  91. CONST
  92.  MENU_IMAGE = 128;
  93.  IM_ITEM    = (NM_ITEM or MENU_IMAGE);
  94.  IM_SUB     = (NM_SUB or MENU_IMAGE);
  95.  
  96.  NM_BARLABEL = -1; { Wert muß bei Einsatz in STR-Pointer gewandelt werden STR() }
  97.  
  98.  
  99. CONST
  100.  NM_MENUDISABLED = MENUENABLED;
  101.  NM_ITEMDISABLED = ITEMENABLED;
  102.  
  103.  NM_COMMANDSTRING= COMMSEQ;
  104.  
  105. CONST NM_FLAGMASK     = (-1-COMMSEQ-ITEMTEXT-HIGHFLAGS);
  106.       NM_FLAGMASK_V39 = (-1-ITEMTEXT-HIGHFLAGS);
  107.  
  108.  
  109.  GTMENU_TRIMMED = $00000001;
  110.  GTMENU_INVALID = $00000002;
  111.  GTMENU_NOMEM   = $00000003;
  112.  
  113. CONST
  114.  MX_WIDTH       = 17;
  115.  MX_HEIGHT      =  9;
  116.  
  117.  CHECKBOX_WIDTH = 26;
  118.  CHECKBOX_HEIGHT= 11;
  119.  
  120. CONST
  121.  GT_TagBase       = TAG_USER+$80000;
  122.  GTVI_NewWindow   = GT_TagBase+1;
  123.  GTVI_NWTags      = GT_TagBase+2;
  124.  GT_Private0      = GT_TagBase+3;
  125.  GTCB_Checked     = GT_TagBase+4;
  126.  GTLV_Top         = GT_TagBase+5;
  127.  GTLV_Labels      = GT_TagBase+6;
  128.  GTLV_ReadOnly    = GT_TagBase+7;
  129.  GTLV_ScrollWidth = GT_TagBase+8;
  130.  GTMX_Labels      = GT_TagBase+9;
  131.  GTMX_Active      = GT_TagBase+10;
  132.  GTTX_Text        = GT_TagBase+11;
  133.  GTTX_CopyText    = GT_TagBase+12;
  134.  GTNM_Number      = GT_TagBase+13;
  135.  GTCY_Labels      = GT_TagBase+14;
  136.  GTCY_Active      = GT_TagBase+15;
  137.  GTPA_Depth       = GT_TagBase+16;
  138.  GTPA_Color       = GT_TagBase+17;
  139.  GTPA_ColorOffset = GT_TagBase+18;
  140.  GTPA_IndicatorWidth  = GT_TagBase+19;
  141.  GTPA_IndicatorHeight = GT_TagBase+20;
  142.  GTSC_Top         = GT_TagBase+21;
  143.  GTSC_Total       = GT_TagBase+22;
  144.  GTSC_Visible     = GT_TagBase+23;
  145.  GTSC_Overlap     = GT_TagBase+24;
  146. { *** GT_TagBase+25 bis GT_TagBase+37 reserviert *** }
  147.  
  148.  GTSL_Min         = GT_TagBase+38;
  149.  GTSL_Max         = GT_TagBase+39;
  150.  GTSL_Level       = GT_TagBase+40;
  151.  GTSL_MaxLevelLen = GT_TagBase+41;
  152.  GTSL_LevelFormat = GT_TagBase+42;
  153.  GTSL_LevelPlace  = GT_TagBase+43;
  154.  GTSL_DispFunc    = GT_TagBase+44;
  155.  GTST_String      = GT_TagBase+45;
  156.  GTST_MaxChars    = GT_TagBase+46;
  157.  GTIN_Number      = GT_TagBase+47;
  158.  GTIN_MaxChars    = GT_TagBase+48;
  159.  GTMN_TextAttr    = GT_TagBase+49;
  160.  GTMN_FrontPen    = GT_TagBase+50;
  161.  GTBB_Recessed    = GT_TagBase+51;
  162.  GT_VisualInfo    = GT_TagBase+52;
  163.  GTLV_ShowSelected = GT_TagBase+53;
  164.  GTLV_Selected    = GT_TagBase+54;
  165.  GT_Reserved1     = GT_TagBase+56;
  166.  GTTX_Border      = GT_TagBase+57;
  167.  GTNM_Border      = GT_TagBase+58;
  168.  GTSC_Arrows      = GT_TagBase+59;
  169.  GTMN_Menu        = GT_TagBase+60;
  170.  GTMX_Spacing     = GT_TagBase+61;
  171.  
  172. { **** neu seit V37 **** }
  173.  
  174.  GTMN_FullMenu    = GT_TagBase+62;
  175.  GTMN_SecondaryError = GT_TagBase+63;
  176.  GT_Underscore    = GT_TagBase+64;
  177.  GTST_EditHook    = GT_TagBase+55;
  178.  GTIN_EditHook    = GTST_EditHook;
  179.  
  180. { **** neu seit V39 **** }
  181.  
  182.  GTMN_Checkmark   = GT_TagBase+65;
  183.  GTMN_AmigaKey    = GT_TagBase+66;
  184.  GTMN_NewLookMenus= GT_TagBase+67;
  185.  
  186.  GTCB_Scaled      = GT_TagBase+68;
  187.  GTMX_Scaled      = GT_TagBase+69;
  188.  
  189.  GTPA_NumColors   = GT_TagBase+70;
  190.  GTMX_TitlePlace  = GT_TagBase+71;
  191.  GTTX_FrontPen    = GT_TagBase+72;
  192.  GTTX_BackPen     = GT_TagBase+73;
  193.  GTTX_Justification= GT_TagBase+74;
  194.  
  195.  GTNM_FrontPen    = GT_TagBase+72;
  196.  GTNM_BackPen     = GT_TagBase+73;
  197.  GTNM_Justification= GT_TagBase+74;
  198.  GTNM_Format      = GT_TagBase+75;
  199.  GTNM_MaxNumberLen= GT_TagBase+76;
  200.  
  201.  GTBB_FrameType   = GT_TagBase+77;
  202.  
  203.  GTLV_MakeVisible = GT_TagBase+78;
  204.  GTLV_ItemHeight  = GT_TagBase+79;
  205.  
  206.  GTSL_MaxPixelLen = GT_TagBase+80;
  207.  GTSL_Justification= GT_TagBase+81;
  208.  
  209.  GTPA_ColorTable  = GT_TagBase+82;
  210.  
  211.  GTLV_CallBack    = GT_TagBase+83;
  212.  GTLV_MaxPen      = GT_TagBase+84;
  213.  
  214.  GTTX_Clipped     = GT_TagBase+85;
  215.  GTNM_Clipped     = GT_TagBase+85;
  216.  
  217. { *** alte Deffinition, nicht mehr so benutzen *** }
  218.  GT_Reserved0     = GTST_EditHook;
  219.  
  220. CONST
  221.  GTJ_LEFT       = 0;
  222.  GTJ_RIGHT      = 1;
  223.  GTJ_CENTER     = 2;
  224.  
  225. CONST
  226.  BBFT_BUTTON    = 1;
  227.  BBFT_RIDGE     = 2;
  228.  BBFT_ICONDROPBOX= 3;
  229.  
  230. CONST
  231.  INTERWIDTH     = 8;
  232.  INTERHEIGHT    = 4;
  233.  
  234. CONST
  235.  NWAY_KIND   = CYCLE_KIND;
  236.  NWAYIDCMP   = CYCLEIDCMP;
  237.  GTNW_Labels = GTCY_Labels;
  238.  GTNW_Active = GTCY_Active;
  239.  
  240. CONST
  241.  LV_DRAW        =$202;
  242.  LVCB_OK        = 1;
  243.  LVCB_UNKNOWN   = 2;
  244.  
  245.  LVR_NORMAL     = 0;
  246.  LVR_SELECTED   = 1;
  247.  LVR_NORMALDISABLED   = 2;
  248.  LVR_SELECTEDDISABLED = 8;
  249.  
  250. TYPE
  251.  p_LVDrawMsg=^LVDrawMsg;
  252.  LVDrawMsg=RECORD
  253.   lvdm_MethodID : Long;
  254.   lvdm_RastPort : p_RastPort;
  255.   lvdm_DrawInfo : p_DrawInfo;
  256.   lvdm_Bounds   : Rectangle;
  257.   lvdm_State    : Long;
  258.  end;
  259.  
  260. {$endif}
  261.