home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / datafiles / text / c_manual / intuition / requesters / example1.c < prev    next >
C/C++ Source or Header  |  1995-02-27  |  5KB  |  112 lines
  1. /***********************************************************/
  2. /*                                                         */
  3. /* Amiga C Encyclopedia (ACE) V3.0      Amiga C Club (ACC) */
  4. /* -------------------------------      ------------------ */
  5. /*                                                         */
  6. /* Book:    ACM Intuition               Amiga C Club       */
  7. /* Chapter: Requesters                  Tulevagen 22       */
  8. /* File:    Example1.c                  181 41  LIDINGO    */
  9. /* Author:  Anders Bjerin               SWEDEN             */
  10. /* Date:    92-05-01                                       */
  11. /* Version: 1.10                                           */
  12. /*                                                         */
  13. /*   Copyright 1992, Anders Bjerin - Amiga C Club (ACC)    */
  14. /*                                                         */
  15. /* Registered members may use this program freely in their */
  16. /*     own commercial/noncommercial programs/articles.     */
  17. /*                                                         */
  18. /***********************************************************/
  19.  
  20. /* This example opens a Simple requester by calling the function       */
  21. /* AutoRequest. It displays a message "This is a very simple           */
  22. /* requester!", and has one gadget connected to it (on the right side) */
  23. /* with the text "OK".                                                 */
  24.  
  25.  
  26.  
  27. #include <intuition/intuition.h>
  28.  
  29.  
  30.  
  31. struct IntuitionBase *IntuitionBase;
  32.  
  33.  
  34.  
  35. /* The body text for the requester: */
  36. struct IntuiText my_body_text=
  37. {
  38.   0,       /* FrontPen, colour 0 (blue). */
  39.   0,       /* BackPen, not used since JAM1. */
  40.   JAM1,    /* DrawMode, do not change the background. */
  41.   15,      /* LedtEdge, 15 pixels out. */
  42.   5,       /* TopEdge, 5 lines down. */
  43.   NULL,    /* ITextFont, default font. */
  44.   "This is a very simple requester!", /* IText, the text . */
  45.   NULL,    /* NextText, no more IntuiText structures link. */
  46. };
  47.  
  48. /* The OK text: */
  49. struct IntuiText my_ok_text=
  50. {
  51.   0,       /* FrontPen, colour 0 (blue). */
  52.   0,       /* BackPen, not used since JAM1. */
  53.   JAM1,    /* DrawMode, do not change the background. */
  54.   6,       /* LedtEdge, 6 pixels out. */
  55.   3,       /* TopEdge, 3 lines down. */
  56.   NULL,    /* ITextFont, default font. */
  57.   "OK",    /* IText, the text that will be printed. */
  58.   NULL,    /* NextText, no more IntuiText structures link. */
  59. };
  60.  
  61.  
  62.  
  63. main()
  64. {
  65.   /* Before we can use Intuition we need to open the Intuition Library: */
  66.   IntuitionBase = (struct IntuitionBase *)
  67.     OpenLibrary( "intuition.library", 0 );
  68.   
  69.   if( IntuitionBase == NULL )
  70.     exit(); /* Could NOT open the Intuition Library! */
  71.  
  72.  
  73.  
  74.   AutoRequest(NULL, &my_body_text, NULL, &my_ok_text, NULL, NULL, 320, 72);
  75.  
  76.   /***********************************************************************/
  77.   /* NULL,              no pointer to a window structure.                */
  78.   /* &my_body_text,     pointer to a IntuiText str. cont. the body text  */
  79.   /* NULL,              no gadget on the left side, thus no text.        */
  80.   /* &my_ok_text,       pointer to a IntuiText str. cont. the neg. text  */
  81.   /* NULL,              no gadget on the left side, thus no IDCMP flags. */
  82.   /* NULL,              IDCMP flags which will satisfy the negative gad. */
  83.   /* 320,               Width, 320 pixels wide.                          */
  84.   /* 72,                Height, 72 lines high.                           */
  85.   /*                                                                     */
  86.   /* Intuition will automatically set the IDCMP flag RELVERIFY for both  */
  87.   /* of the gadgets, so we do not need to set any IDCMP flags if we do   */
  88.   /* not want to.                                                        */
  89.   /*                                                                     */
  90.   /* The requester will look like this:                                  */
  91.   /*                                                                     */
  92.   /* ---------------------------------------                             */
  93.   /* | System Request ================[*][*]                             */
  94.   /* ---------------------------------------                             */
  95.   /* | This is a very simple requester! |  |                             */
  96.   /* |                                  |  |                             */
  97.   /* |                                  |  |                             */
  98.   /* |                           ------ |  |                             */
  99.   /* |                           | OK | |  |                             */
  100.   /* |                           ------ |  |                             */
  101.   /* ------------------------------------[*]                             */
  102.   /*                                                                     */
  103.   /***********************************************************************/
  104.  
  105.  
  106.  
  107.   /* Close the Intuition Library since we have opened it: */
  108.   CloseLibrary( IntuitionBase );
  109.   
  110.   /* THE END */
  111. }
  112.