home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 339.lha / KLib / manx.test.c < prev    next >
C/C++ Source or Header  |  1990-01-24  |  1KB  |  65 lines
  1.  
  2. /*
  3.  *  kd_freq.library Test
  4.  *
  5.  *  Tested on Manx 3.60a.
  6.  */
  7.  
  8. #include "KDBase.h"
  9.  
  10. UBYTE directory[128];
  11. UBYTE filename[32];
  12. UBYTE pattern[32];
  13.  
  14. /* for Manx.. we don't need any parsing */
  15. void  _wb_parse() {}
  16. void _cli_parse() {}
  17.  
  18. struct Library *KD_FReqBase, *OpenLibrary();
  19.  
  20. struct ExtraData extras;
  21.  
  22. main()
  23.     {
  24.     KD_FReqBase = OpenLibrary(KLIBNAME,KLIBVERSION);
  25.  
  26.     if (KD_FReqBase) 
  27.         {
  28.         /* Make sure that all default strings are zero'd out. */
  29.         directory[0] = filename[0] = pattern[0] = 0;
  30.  
  31.         /* Set default wildcard pattern */
  32.         /* strcpy(pattern,"#?.?"); */
  33.  
  34.         /* Call file requester */
  35.  
  36.         extras.oktext     = (UBYTE *) "Load";
  37.         extras.canceltext = (UBYTE *) "No Way!";
  38.  
  39.         if (FReq(NULL,
  40.             "Test of 'kd_freq.library'", 
  41.             filename,directory,pattern, FR_CANCELTEXT |
  42.             FR_OKTEXT | FR_AUTOPOSITION | FR_AUTOSIZE | FR_NOINFO | FR_SCREENFONT
  43.             ,&extras))
  44.             {    
  45.             /* You can immediately strcat(directory,filename); since
  46.                 directory will contain the valid file seperator (either
  47.                 \ or : at the end of the directory name
  48.             */
  49.  
  50.             puts(directory);
  51.             puts(filename);
  52.             }
  53.         else
  54.             {
  55.             puts("Requester Cancelled!");
  56.             }
  57.  
  58.         CloseLibrary(KD_FReqBase);
  59.             }
  60.      else 
  61.         {
  62.         puts("Can't Open 'kd_freq.library'.  Make sure it is in LIBS:");
  63.         }
  64.     }
  65.