home *** CD-ROM | disk | FTP | other *** search
/ Software 2000 / Software 2000 Volume 1 (Disc 1 of 2).iso / utilities / u136.dms / in.adf / FileRequester / GFDemo.C < prev    next >
Encoding:
C/C++ Source or Header  |  1978-08-30  |  5.3 KB  |  154 lines
  1. /*****
  2.     Demo Program for using FILE NAME REQUESTER
  3.     This program shows how to use the file name requester, getfil.o
  4.  
  5. (c) 1986 by MicroSmiths, Inc.
  6. Permission is granted to use the object code routine 'getfile' in any
  7. Amiga program, commercial or otherwise, EXCEPT that it shall NOT BE
  8. used in any Text Editor, and it shall NOT BE SOLD as an OBJECT MODULE
  9. or in a LIBRARY.
  10.  
  11.     This program is used with the Object Code file, 'getfil.o',
  12. to provide a file name requester.  The object code file is posted
  13. in the 'listings' area.
  14.  
  15.     The object code file will need to be truncated if you got these
  16. two files via modem.  The correct size for 'getfile.o' is 5680 bytes.
  17.  
  18.     This program will compile using the Lattice 'C' compiler.  The program
  19. is linked with the command shown below:
  20.  
  21. Alink df1:lib/lstartup.obj,gfdemo.o,getfile.o LIB df1:lib/lc.lib,df1:lib/amiga.lib TO gfdemo
  22.  
  23.   The basic call is:
  24.  
  25.     getfile(Window,Hailing_string,file_name,directory_name);
  26.  
  27. Where:
  28.     Window is a pointer to your window
  29.     Hailing_string is a prompt displayed in the requester
  30.     file_name is a text array which will be altered by getfile,
  31.         it returns the file name.
  32.     directory_name is a text array altered by getfile, it
  33.         is the directory.
  34.  
  35.     The return value is either a pointer to your buffer, file_name,
  36.     or NULL if the user selected CANCEL.
  37.  
  38.     You must reserve two text areas for file and directory like so:
  39.  
  40. TEXT    file_name[34];
  41. TEXT    dir_name[67]
  42.  
  43.     Please, if you find any bugs in getfil.o, let us know ASAP so
  44. we can update this file.
  45. ************************************************************************/
  46.  
  47. #include <exec/types.h>
  48. #include <exec/devices.h>
  49. #include <intuition/intuition.h>
  50.  
  51. struct IntuitionBase *IntuitionBase;    /* Handles for inutition and    */
  52. struct GfxBase    *GfxBase;        /* graphics libraries        */
  53.  
  54. /************************************************************************/
  55. /* You supply two string buffers, for the filename and directory name    */
  56. /* You may pre-initialize them to any string you want.            */
  57. /************************************************************************/
  58. #define    FNAME_SIZE    33
  59. TEXT file_name[FNAME_SIZE+1];
  60. TEXT dir_name[FNAME_SIZE+FNAME_SIZE+1];
  61.  
  62. struct Window    *p_Window;        /* Handle for window we open  */
  63.  
  64. /* Struct to open Window   */
  65. struct NewWindow NewWindow = {
  66.    10,10,400,150, 2,1,        /* Left,Top, Width,Height, Pens  */
  67.    MOUSEBUTTONS | MOUSEMOVE | MENUPICK | CLOSEWINDOW, /* IDCMP flags */
  68.    SMART_REFRESH | ACTIVATE | WINDOWSIZING | WINDOWCLOSE |
  69.      WINDOWDRAG | WINDOWDEPTH | REPORTMOUSE,    /* Window flags    */
  70.    NULL, NULL,            /* First Gadget, Checkmark image */
  71.    (UBYTE *)"MicroSmiths Requester Demo", /* Window Title    */
  72.    NULL, NULL,            /* Screen and BitMap        */
  73.    100,60, 32767,32767,        /* Window Sizing limits        */
  74.    WBENCHSCREEN};        /* WBENCH or CUSTOMSCREEN    */
  75.  
  76. /* Menu description  */
  77. struct IntuiText menu_text = { 2,1,JAM2, 20,1, NULL, (UBYTE *)"Open",NULL };
  78.  
  79. struct MenuItem menu_item = {
  80.    NULL, 0,10,100,10,        /* Next item, Left, Top, Width, Height */
  81.    HIGHCOMP | ITEMENABLED | ITEMTEXT | COMMSEQ,
  82.    NULL,(APTR)&menu_text,    /* MutualExclude, ItemFill        */
  83.    NULL, 'Q', NULL };        /* SelectFill, Command , SubItem    */
  84.  
  85. struct Menu simple_menu = {
  86.    NULL, 0,0,60,10, MENUENABLED, "Menu", &menu_item };
  87.  
  88.  
  89. /****************************************************************/
  90. /* init_window()                        */
  91. /*    Opens Window, sets up menu strip and I/O Port        */
  92. /****************************************************************/
  93. init_window()
  94. {
  95. if ( ! (IntuitionBase = (struct IntuitionBase *)
  96.     OpenLibrary("intuition.library",29)) ||
  97.      ! (GfxBase =(struct GfxBase *)OpenLibrary("graphics.library",29)) )
  98.          exit(20);
  99.  
  100. /* Open the window, sets handle p_Window   */
  101. if ( ! (p_Window = (struct Window *)OpenWindow( &NewWindow )) ) {
  102.     CloseLibrary(GfxBase);    CloseLibrary(IntuitionBase);
  103.     exit(20);
  104.     }
  105.  
  106. SetMenuStrip( p_Window, &simple_menu );
  107. }
  108.  
  109. /***************************************************************/
  110. /* clear_window                                                */
  111. /*     Clears window and screen set up by init_window          */
  112. /***************************************************************/
  113. clear_window()
  114. {
  115.    ClearMenuStrip(p_Window);
  116.    CloseWindow(p_Window);
  117. }
  118.  
  119.  
  120. /*** Main:  Open window, process inputs , close window ***/
  121. main()
  122. {
  123. struct IntuiMessage *message;    /* Gets input event    */
  124. int    class,code;        /* Event information    */
  125. BOOL    quit_flag;        /* Application flags    */
  126.  
  127. init_window();                 /* Open the window    */
  128.  
  129. for ( quit_flag = FALSE; ! quit_flag ; ) {
  130.  
  131.     while (! (message=(struct IntuiMessage *)GetMsg(p_Window->UserPort)) )
  132.     WaitPort( p_Window->UserPort );  /* Wait for input event          */
  133.  
  134.     class = message->Class;    code = message->Code;   /* Get event info */
  135.     ReplyMsg( message );    /* Tell intuition we're through with event   */
  136.  
  137.     switch ( class ) {           /*    Process the input event           */
  138.     case CLOSEWINDOW:   quit_flag = TRUE;
  139.         break;
  140.  
  141.     /* Heres what you're looking for...    */
  142.     case MENUPICK:
  143.        if ( (MENUNUM( code ) == 0) && (ITEMNUM( code ) == 0) ) {
  144.         /* Call up the filename requester    */
  145.         if ( get_fname(p_Window, "Your String Here",file_name,dir_name) )
  146.             printf("Got name %s directory %s\n",file_name,dir_name);
  147.         else
  148.             printf("User aborted getfile request\n");
  149.         }
  150.     }
  151.     }
  152. clear_window();               /* Return all resources and exit */
  153. }
  154.