home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Workbench / Misc / LSDASC15.LHA / Associate_V1.5 / Source / AssociateGui.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-01-11  |  11.6 KB  |  415 lines
  1. /*
  2.  *  Source machine generated by GadToolsBox V2.0b
  3.  *  which is (c) Copyright 1991-1993 Jaba Development
  4.  *
  5.  *  GUI Designed by : Hydra/LSD
  6.  */
  7.  
  8. #include <exec/types.h>
  9. #include <intuition/intuition.h>
  10. #include <intuition/classes.h>
  11. #include <intuition/classusr.h>
  12. #include <intuition/imageclass.h>
  13. #include <intuition/gadgetclass.h>
  14. #include <libraries/gadtools.h>
  15. #include <graphics/displayinfo.h>
  16. #include <graphics/gfxbase.h>
  17. #include <clib/exec_protos.h>
  18. #include <clib/intuition_protos.h>
  19. #include <clib/gadtools_protos.h>
  20. #include <clib/graphics_protos.h>
  21. #include <clib/utility_protos.h>
  22. #include <string.h>
  23.  
  24. #include "AssociateGui.h"
  25.  
  26. struct Screen         *Scr = NULL;
  27. UBYTE                 *PubScreenName = "Workbench";
  28. APTR                   VisualInfo = NULL;
  29. struct Window         *AssociateWnd = NULL;
  30. struct Window         *PickWnd = NULL;
  31. struct Gadget         *AssociateGList = NULL;
  32. struct Gadget         *PickGList = NULL;
  33. struct Menu           *AssociateMenus = NULL;
  34. struct IntuiMessage    AssociateMsg;
  35. struct IntuiMessage    PickMsg;
  36. struct Gadget         *AssociateGadgets[19];
  37. struct Gadget         *PickGadgets[3];
  38. extern Class          *initGet( void );
  39. struct IClass         *getClass = NULL;
  40. struct _Object        *getImage = NULL;
  41. UWORD                  AssociateLeft = 39;
  42. UWORD                  AssociateTop = 23;
  43. UWORD                  AssociateWidth = 598;
  44. UWORD                  AssociateHeight = 177;
  45. UWORD                  PickLeft = 124;
  46. UWORD                  PickTop = 17;
  47. UWORD                  PickWidth = 195;
  48. UWORD                  PickHeight = 187;
  49. UBYTE                 *AssociateWdt = (UBYTE *)"Associate 1.5 (13/01/1995) By Dominic Clifton - Deluxe Software Ltd.";
  50. UBYTE                 *PickWdt = (UBYTE *)"Pick A Type";
  51.  
  52. struct TextAttr topaz8 = {
  53.   ( STRPTR )"topaz.font", 8, 0x00, 0x01 };
  54.  
  55. struct NewMenu AssociateNewMenu[] = {
  56.   NM_TITLE, (STRPTR)"Main", NULL, 0, NULL, NULL,
  57.   NM_ITEM, (STRPTR)"About", (STRPTR)"?", 0, 0L, (APTR)AssociateItem0,
  58.   NM_ITEM, (STRPTR)NM_BARLABEL, NULL, 0, 0L, NULL,
  59.   NM_ITEM, (STRPTR)"Quit!", (STRPTR)"q", 0, 0L, (APTR)AssociateItem1,
  60.   NM_END, NULL, NULL, 0, 0L, NULL };
  61.  
  62. UWORD AssociateGTypes[] = {
  63.   LISTVIEW_KIND,
  64.   LISTVIEW_KIND,
  65.   LISTVIEW_KIND,
  66.   GENERIC_KIND,
  67.   STRING_KIND,
  68.   BUTTON_KIND,
  69.   CHECKBOX_KIND,
  70.   BUTTON_KIND,
  71.   BUTTON_KIND,
  72.   BUTTON_KIND,
  73.   BUTTON_KIND,
  74.   BUTTON_KIND,
  75.   BUTTON_KIND,
  76.   BUTTON_KIND,
  77.   BUTTON_KIND,
  78.   BUTTON_KIND,
  79.   BUTTON_KIND,
  80.   BUTTON_KIND,
  81.   BUTTON_KIND
  82. };
  83.  
  84. UWORD PickGTypes[] = {
  85.   LISTVIEW_KIND,
  86.   BUTTON_KIND,
  87.   BUTTON_KIND
  88. };
  89.  
  90. struct NewGadget AssociateNGad[] = {
  91.   6, 17, 190, 88, (UBYTE *)"File Type", NULL, GD_TypeList, PLACETEXT_ABOVE, NULL, (APTR)TypeListClicked,
  92.   199, 17, 190, 88, (UBYTE *)"Name Patterns", NULL, GD_NamePList, PLACETEXT_ABOVE, NULL, (APTR)NamePListClicked,
  93.   392, 17, 190, 88, (UBYTE *)"File Patterns", NULL, GD_FilePList, PLACETEXT_ABOVE, NULL, (APTR)FilePListClicked,
  94.   6, 143, 20, 14, NULL, NULL, GD_IconPick, 0, NULL, (APTR)IconPickClicked,
  95.   28, 143, 253, 14, (UBYTE *)"Icon Filename", NULL, GD_IconStr, PLACETEXT_ABOVE, NULL, (APTR)IconStrClicked,
  96.   283, 143, 111, 14, (UBYTE *)"Icon Info", NULL, GD_IconInfo, PLACETEXT_IN, NULL, (APTR)IconInfoClicked,
  97.   269, 159, 26, 11, (UBYTE *)"Run Info When activated", NULL, GD_IconRun, PLACETEXT_LEFT, NULL, (APTR)IconRunClicked,
  98.   6, 107, 62, 14, (UBYTE *)"Add", NULL, GD_TypeAdd, PLACETEXT_IN, NULL, (APTR)TypeAddClicked,
  99.   70, 107, 62, 14, (UBYTE *)"Delete", NULL, GD_TypeDelete, PLACETEXT_IN, NULL, (APTR)TypeDeleteClicked,
  100.   199, 107, 62, 14, (UBYTE *)"Add", NULL, GD_NamePAdd, PLACETEXT_IN, NULL, (APTR)NamePAddClicked,
  101.   263, 107, 62, 14, (UBYTE *)"Delete", NULL, GD_NamePDelete, PLACETEXT_IN, NULL, (APTR)NamePDeleteClicked,
  102.   392, 107, 62, 14, (UBYTE *)"Add", NULL, GD_FilePAdd, PLACETEXT_IN, NULL, (APTR)FilePAddClicked,
  103.   456, 107, 62, 14, (UBYTE *)"Delete", NULL, GD_FilePDelete, PLACETEXT_IN, NULL, (APTR)FilePDeleteClicked,
  104.   403, 127, 185, 15, (UBYTE *)"Save", NULL, GD_Save, PLACETEXT_IN, NULL, (APTR)SaveClicked,
  105.   403, 143, 185, 15, (UBYTE *)"Help", NULL, GD_Help, PLACETEXT_IN, NULL, (APTR)HelpClicked,
  106.   403, 159, 185, 15, (UBYTE *)"OK", NULL, GD_OK, PLACETEXT_IN, NULL, (APTR)OKClicked,
  107.   134, 107, 62, 14, (UBYTE *)"Edit", NULL, GD_TypeEdit, PLACETEXT_IN, NULL, (APTR)TypeEditClicked,
  108.   327, 107, 62, 14, (UBYTE *)"Edit", NULL, GD_NamePEdit, PLACETEXT_IN, NULL, (APTR)NamePEditClicked,
  109.   520, 107, 62, 14, (UBYTE *)"Edit", NULL, GD_FilePEdit, PLACETEXT_IN, NULL, (APTR)FilePEditClicked
  110. };
  111.  
  112. struct NewGadget PickNGad[] = {
  113.   2, 1, 184, 160, NULL, NULL, GD_PickType, 0, NULL, (APTR)PickTypeClicked,
  114.   2, 162, 91, 21, (UBYTE *)"Ok!", NULL, GD_PickOk, PLACETEXT_IN, NULL, (APTR)PickOkClicked,
  115.   95, 162, 91, 21, (UBYTE *)"Cancel", NULL, GD_PickCancel, PLACETEXT_IN, NULL, (APTR)PickCancelClicked
  116. };
  117.  
  118. ULONG AssociateGTags[] = {
  119.   (GTLV_ShowSelected), NULL, (TAG_DONE),
  120.   (GTLV_ShowSelected), NULL, (TAG_DONE),
  121.   (GTLV_ShowSelected), NULL, (TAG_DONE),
  122.   (TAG_DONE),
  123.   (GTST_MaxChars), 256, (TAG_DONE),
  124.   (TAG_DONE),
  125.   (TAG_DONE),
  126.   (TAG_DONE),
  127.   (TAG_DONE),
  128.   (TAG_DONE),
  129.   (TAG_DONE),
  130.   (TAG_DONE),
  131.   (TAG_DONE),
  132.   (TAG_DONE),
  133.   (TAG_DONE),
  134.   (TAG_DONE),
  135.   (TAG_DONE),
  136.   (TAG_DONE),
  137.   (TAG_DONE)
  138. };
  139.  
  140. ULONG PickGTags[] = {
  141.   (GTLV_ShowSelected), NULL, (TAG_DONE),
  142.   (TAG_DONE),
  143.   (TAG_DONE)
  144. };
  145.  
  146. int SetupScreen( void )
  147. {
  148.   if ( ! ( Scr = LockPubScreen( PubScreenName )))
  149.     return( 1L );
  150.  
  151.   if ( ! ( VisualInfo = GetVisualInfo( Scr, TAG_DONE )))
  152.     return( 2L );
  153.  
  154.   if ( ! ( getClass = initGet()))
  155.     return( 3L );
  156.  
  157.   if ( ! ( getImage = NewObject( getClass, NULL, GT_VisualInfo, VisualInfo, TAG_DONE )))
  158.     return( 4L );
  159.  
  160.   return( 0L );
  161. }
  162.  
  163. void CloseDownScreen( void )
  164. {
  165.   if ( getImage   ) {
  166.     DisposeObject( getImage );
  167.     getImage = NULL;
  168.   }
  169.  
  170.   if ( getClass   ) {
  171.     FreeClass( getClass );
  172.     getClass = NULL;
  173.   }
  174.  
  175.   if ( VisualInfo ) {
  176.     FreeVisualInfo( VisualInfo );
  177.     VisualInfo = NULL;
  178.   }
  179.  
  180.   if ( Scr        ) {
  181.     UnlockPubScreen( NULL, Scr );
  182.     Scr = NULL;
  183.   }
  184. }
  185.  
  186. void AssociateRender( void )
  187. {
  188.   UWORD   offx, offy;
  189.  
  190.   offx = AssociateWnd->BorderLeft;
  191.   offy = AssociateWnd->BorderTop;
  192.  
  193.  
  194.   DrawBevelBox( AssociateWnd->RPort, offx + 2, offy + 127, 398, 47, GT_VisualInfo, VisualInfo, TAG_DONE );
  195.   DrawBevelBox( AssociateWnd->RPort, offx + 2, offy + 1, 586, 124, GT_VisualInfo, VisualInfo, TAG_DONE );
  196. }
  197.  
  198. int HandleAssociateIDCMP( void )
  199. {
  200.   struct IntuiMessage *m;
  201.   struct MenuItem   *n;
  202.   int     (*func)();
  203.   BOOL      running = TRUE;
  204.  
  205.   while( m = GT_GetIMsg( AssociateWnd->UserPort )) {
  206.  
  207.     CopyMem(( char * )m, ( char * )&AssociateMsg, (long)sizeof( struct IntuiMessage ));
  208.  
  209.     GT_ReplyIMsg( m );
  210.  
  211.     switch ( AssociateMsg.Class ) {
  212.  
  213.       case  IDCMP_REFRESHWINDOW:
  214.         GT_BeginRefresh( AssociateWnd );
  215.         AssociateRender();
  216.         GT_EndRefresh( AssociateWnd, TRUE );
  217.         break;
  218.  
  219.       case  IDCMP_CLOSEWINDOW:
  220.         running = AssociateCloseWindow();
  221.         break;
  222.  
  223.       case  IDCMP_GADGETUP:
  224.       case  IDCMP_GADGETDOWN:
  225.         func = ( void * )(( struct Gadget * )AssociateMsg.IAddress )->UserData;
  226.         running = func();
  227.         break;
  228.  
  229.       case  IDCMP_MENUPICK:
  230.         while( AssociateMsg.Code != MENUNULL ) {
  231.           n = ItemAddress( AssociateMenus, AssociateMsg.Code );
  232.           func = (void *)(GTMENUITEM_USERDATA( n ));
  233.           running = func();
  234.           AssociateMsg.Code = n->NextSelect;
  235.         }
  236.         break;
  237.     }
  238.   }
  239.   return( running );
  240. }
  241.  
  242. int OpenAssociateWindow( void )
  243. {
  244.   struct NewGadget  ng;
  245.   struct Gadget *g;
  246.   UWORD   lc, tc;
  247.   UWORD   offx = Scr->WBorLeft, offy = Scr->WBorTop + Scr->RastPort.TxHeight + 1;
  248.  
  249.   if ( ! ( g = CreateContext( &AssociateGList )))
  250.     return( 1L );
  251.  
  252.   for( lc = 0, tc = 0; lc < Associate_CNT; lc++ ) {
  253.  
  254.     CopyMem((char * )&AssociateNGad[ lc ], (char * )&ng, (long)sizeof( struct NewGadget ));
  255.  
  256.     ng.ng_VisualInfo = VisualInfo;
  257.     ng.ng_TextAttr   = &topaz8;
  258.     ng.ng_LeftEdge  += offx;
  259.     ng.ng_TopEdge   += offy;
  260.  
  261.     AssociateGadgets[ lc ] = g = CreateGadgetA((ULONG)AssociateGTypes[ lc ], g, &ng, ( struct TagItem * )&AssociateGTags[ tc ] );
  262.  
  263.     if ( AssociateGTypes[ lc ] == GENERIC_KIND ) {
  264.       g->Flags             |= GFLG_GADGIMAGE | GFLG_GADGHIMAGE;
  265.       g->Activation        |= GACT_RELVERIFY;
  266.       g->GadgetRender       = (APTR)getImage;
  267.       g->SelectRender       = (APTR)getImage;
  268.     }
  269.  
  270.     while( AssociateGTags[ tc ] ) tc += 2;
  271.     tc++;
  272.  
  273.     if ( NOT g )
  274.       return( 2L );
  275.   }
  276.  
  277.   if ( ! ( AssociateMenus = CreateMenus( AssociateNewMenu, GTMN_FrontPen, 0L, TAG_DONE )))
  278.     return( 3L );
  279.  
  280.   LayoutMenus( AssociateMenus, VisualInfo, GTMN_TextAttr, &topaz8, TAG_DONE );
  281.  
  282.   if ( ! ( AssociateWnd = OpenWindowTags( NULL,
  283.         WA_Left,  AssociateLeft,
  284.         WA_Top,   AssociateTop,
  285.         WA_Width, AssociateWidth,
  286.         WA_Height,  AssociateHeight + offy,
  287.         WA_IDCMP, LISTVIEWIDCMP|IDCMP_GADGETUP|STRINGIDCMP|BUTTONIDCMP|CHECKBOXIDCMP|IDCMP_MENUPICK|IDCMP_CLOSEWINDOW|IDCMP_REFRESHWINDOW,
  288.         WA_Flags, WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_CLOSEGADGET|WFLG_SMART_REFRESH|WFLG_ACTIVATE,
  289.         WA_Gadgets, AssociateGList,
  290.         WA_Title, AssociateWdt,
  291.         TAG_DONE )))
  292.   return( 4L );
  293.  
  294.   SetMenuStrip( AssociateWnd, AssociateMenus );
  295.   GT_RefreshWindow( AssociateWnd, NULL );
  296.  
  297.   AssociateRender();
  298.  
  299.   return( 0L );
  300. }
  301.  
  302. void CloseAssociateWindow( void )
  303. {
  304.   if ( AssociateMenus      ) {
  305.     ClearMenuStrip( AssociateWnd );
  306.     FreeMenus( AssociateMenus );
  307.     AssociateMenus = NULL;  }
  308.  
  309.   if ( AssociateWnd        ) {
  310.     CloseWindow( AssociateWnd );
  311.     AssociateWnd = NULL;
  312.   }
  313.  
  314.   if ( AssociateGList      ) {
  315.     FreeGadgets( AssociateGList );
  316.     AssociateGList = NULL;
  317.   }
  318. }
  319.  
  320. int HandlePickIDCMP( void )
  321. {
  322.   struct IntuiMessage *m;
  323.   int     (*func)();
  324.   BOOL      running = TRUE;
  325.  
  326.   while( m = GT_GetIMsg( PickWnd->UserPort )) {
  327.  
  328.     CopyMem(( char * )m, ( char * )&PickMsg, (long)sizeof( struct IntuiMessage ));
  329.  
  330.     GT_ReplyIMsg( m );
  331.  
  332.     switch ( PickMsg.Class ) {
  333.  
  334.       case  IDCMP_REFRESHWINDOW:
  335.         GT_BeginRefresh( PickWnd );
  336.         GT_EndRefresh( PickWnd, TRUE );
  337.         break;
  338.  
  339.       case  IDCMP_CLOSEWINDOW:
  340.         running = PickCloseWindow();
  341.         break;
  342.  
  343.       case  IDCMP_VANILLAKEY:
  344.         running = PickVanillaKey();
  345.         break;
  346.  
  347.       case  IDCMP_GADGETUP:
  348.       case  IDCMP_GADGETDOWN:
  349.         func = ( void * )(( struct Gadget * )PickMsg.IAddress )->UserData;
  350.         running = func();
  351.         break;
  352.     }
  353.   }
  354.   return( running );
  355. }
  356.  
  357. int OpenPickWindow( void )
  358. {
  359.   struct NewGadget  ng;
  360.   struct Gadget *g;
  361.   UWORD   lc, tc;
  362.   UWORD   offx = Scr->WBorLeft, offy = Scr->WBorTop + Scr->RastPort.TxHeight + 1;
  363.  
  364.   if ( ! ( g = CreateContext( &PickGList )))
  365.     return( 1L );
  366.  
  367.   for( lc = 0, tc = 0; lc < Pick_CNT; lc++ ) {
  368.  
  369.     CopyMem((char * )&PickNGad[ lc ], (char * )&ng, (long)sizeof( struct NewGadget ));
  370.  
  371.     ng.ng_VisualInfo = VisualInfo;
  372.     ng.ng_TextAttr   = &topaz8;
  373.     ng.ng_LeftEdge  += offx;
  374.     ng.ng_TopEdge   += offy;
  375.  
  376.     PickGadgets[ lc ] = g = CreateGadgetA((ULONG)PickGTypes[ lc ], g, &ng, ( struct TagItem * )&PickGTags[ tc ] );
  377.  
  378.     while( PickGTags[ tc ] ) tc += 2;
  379.     tc++;
  380.  
  381.     if ( NOT g )
  382.       return( 2L );
  383.   }
  384.  
  385.   if ( ! ( PickWnd = OpenWindowTags( NULL,
  386.         WA_Left,  PickLeft,
  387.         WA_Top,   PickTop,
  388.         WA_Width, PickWidth,
  389.         WA_Height,  PickHeight + offy,
  390.         WA_IDCMP, LISTVIEWIDCMP|BUTTONIDCMP|IDCMP_CLOSEWINDOW|IDCMP_VANILLAKEY|IDCMP_REFRESHWINDOW,
  391.         WA_Flags, WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_SMART_REFRESH|WFLG_ACTIVATE,
  392.         WA_Gadgets, PickGList,
  393.         WA_Title, PickWdt,
  394.         TAG_DONE )))
  395.   return( 4L );
  396.  
  397.   GT_RefreshWindow( PickWnd, NULL );
  398.  
  399.   return( 0L );
  400. }
  401.  
  402. void ClosePickWindow( void )
  403. {
  404.   if ( PickWnd        ) {
  405.     CloseWindow( PickWnd );
  406.     PickWnd = NULL;
  407.   }
  408.  
  409.   if ( PickGList      ) {
  410.     FreeGadgets( PickGList );
  411.     PickGList = NULL;
  412.   }
  413. }
  414.  
  415.