home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / m / motifpg2.zip / ch13 / xmenu3.c < prev    next >
C/C++ Source or Header  |  1992-08-18  |  4KB  |  140 lines
  1. /*
  2.  * Copyright 1989, 1992 O'Reilly and Associates, Inc.
  3.  * See ../Copyright for complete rights and liability information.
  4.  */
  5.  
  6.  
  7. /* 
  8.  *  xmenu3.c - pulldown menu invoked with MenuButton widget
  9.  */
  10.  
  11. /*
  12.  *  So that we can use fprintf:
  13.  */
  14. #include <stdio.h>
  15.  
  16. /* 
  17.  * Standard Toolkit include files:
  18.  */
  19. #include <X11/Intrinsic.h>
  20. #include <X11/StringDefs.h>
  21.  
  22. #include <X11/Shell.h>
  23.  
  24. /*
  25.  * Public include files for widgets used in this file.
  26.  */
  27. #include <X11/Xaw/Command.h>
  28. #include <X11/Xaw/MenuButton.h>
  29. #include <X11/Xaw/Box.h>
  30. #include <X11/Xaw/Label.h>
  31.  
  32. Widget pshell;
  33.  
  34. /*
  35.  * quit button callback function
  36.  */
  37. /* ARGSUSED */
  38. void Quit(w, client_data, call_data)
  39. Widget w;
  40. XtPointer client_data, call_data;
  41. { 
  42.     exit(0); 
  43. }
  44.  
  45. /*
  46.  * menu pane button callback function
  47.  */
  48. /* ARGSUSED */
  49. void PaneChosen(w, client_data, call_data)
  50. Widget w;
  51. XtPointer client_data;  /* cast to pane_number */
  52. XtPointer call_data;    /* unused */
  53. { 
  54.     int pane_number = (int) client_data;
  55.     printf("Pane %d chosen.\n", pane_number);
  56.     /* popdown the parent of the parent (pshell) */
  57.     XtPopdown(pshell);
  58. }
  59.  
  60. main(argc, argv)
  61. int argc;
  62. char **argv;
  63. {
  64.     XtAppContext app_context;
  65.     Widget topLevel, box, pressme, quit, menulabel, menubox, menupane[10];
  66.     int i;
  67.     String buf[50];
  68.  
  69.     XtSetLanguageProc(NULL, (XtLanguageProc)NULL, NULL);
  70.  
  71.     topLevel = XtVaAppInitialize(
  72.         &app_context,       /* Application context */
  73.         "XMenu3",           /* application class name */
  74.         NULL, 0,            /* command line option list */
  75.         &argc, argv,        /* command line args */
  76.         NULL,               /* for missing app-defaults file */
  77.         NULL);              /* terminate varargs list */
  78.  
  79.     box = XtCreateManagedWidget(
  80.         "box",      /* widget name */
  81.         boxWidgetClass, /* widget class */
  82.         topLevel,       /* parent widget*/
  83.         NULL,       /* argument list*/
  84.         0           /* arglist size */
  85.         );
  86.  
  87.     quit = XtCreateManagedWidget(
  88.         "quit",         /* widget name */
  89.         commandWidgetClass,     /* widget class */
  90.         box,            /* parent widget*/
  91.         NULL,           /* argument list*/
  92.         0               /* arglist size */
  93.         );
  94.  
  95.     pressme = XtVaCreateManagedWidget(
  96.         "pressme",          /* widget name   */
  97.         menuButtonWidgetClass,  /* widget class */
  98.         box,            /* parent widget*/
  99.         XtNmenuName, "pshell",
  100.         NULL);
  101.  
  102.     pshell = XtCreatePopupShell(
  103.         "pshell",        /* widget name */
  104.         transientShellWidgetClass, /* widget class */
  105.         pressme,        /* parent widget */
  106.         NULL,            /* argument list */
  107.         0            /* arglist size */
  108.         );
  109.  
  110.     menubox = XtCreateManagedWidget(
  111.         "menubox",              /* widget name   */
  112.         boxWidgetClass,         /* widget class */
  113.         pshell,                 /* parent widget*/
  114.         NULL,                   /* argument list*/
  115.         0                   /* arglist size */
  116.     );
  117.     
  118.     menulabel = XtCreateManagedWidget(
  119.         "menulabel",            /* widget name   */
  120.         labelWidgetClass,       /* widget class */
  121.         menubox,                /* parent widget*/
  122.         NULL,                   /* argument list*/
  123.         0                   /* arglist size */
  124.         );
  125.  
  126.     for (i = 0; i < 10; i++) {
  127.       sprintf(buf, "menupane%d", i);
  128.       menupane[i] = XtCreateManagedWidget(buf,   /* widget name   */
  129.                     commandWidgetClass, menubox, NULL, 0);
  130.  
  131.       XtAddCallback(menupane[i], XtNcallback, PaneChosen, i);
  132.     }
  133.  
  134.     XtAddCallback(quit, XtNcallback, Quit, NULL);
  135.  
  136.     XtRealizeWidget(topLevel);
  137.  
  138.     XtAppMainLoop(app_context);
  139. }
  140.