home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume2 / xscope / part01 / InitCmd.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-04-28  |  2.2 KB  |  65 lines

  1. #include "xsignal.h"
  2.  
  3. void init_cmd(pane)
  4.     sigbox *pane;
  5. {
  6.     static XtCallbackRec callback[2]; /* K&R: initialized to NULL */
  7.     static XtCallbackRec thumbcall[2]; /* K&R: initialized to NULL */
  8.     Widget cmds,pb1;
  9.     int narg;
  10.     Arg arg[10];
  11.  
  12.     narg = 0;
  13.     XtSetArg( arg[narg], XtNvertPane, FALSE); narg++;
  14.     XtSetArg( arg[narg], XtNwidth, WIDTH ); narg++;
  15.     XtSetArg( arg[narg], XtNheight, MENUHIGH); narg++;
  16.     cmds = XtCreateManagedWidget("cmds", menuPaneWidgetClass,
  17.             pane->box, arg, narg);
  18.  
  19.     callback[0].callback = QuitPane;
  20.     callback[0].closure = (caddr_t) pane;
  21.     narg = 0;
  22.     XtSetArg( arg[narg], XtNcallback, callback ); narg++;
  23.     XtSetArg( arg[narg], XtNlabel, "quit" ); narg++;
  24.     XtCreateManagedWidget( "file", commandWidgetClass,
  25.                         cmds, arg, narg );
  26.     narg = 0;
  27.     XtSetArg( arg[narg], XtNlabel, "file" ); narg++;
  28.     pane->file_button = XtCreateManagedWidget( "file", commandWidgetClass,
  29.                         cmds, arg, narg );
  30.     InitFilePopup(pane);
  31.  
  32.     callback[0].callback = Draw;
  33.     callback[0].closure = (caddr_t) pane;
  34.     narg = 0;
  35.     XtSetArg( arg[narg], XtNcallback, callback ); narg++;
  36.     XtSetArg( arg[narg], XtNlabel, "redraw" ); narg++;
  37.     XtSetArg( arg[narg], XtNsensitive, False ); narg++;
  38.     pane->draw = XtCreateManagedWidget( "draw", commandWidgetClass,
  39.                 cmds, arg, narg );
  40.  
  41.     narg = 0;
  42.     XtSetArg( arg[narg], XtNlabel, "style" ); narg++;
  43.     pane->style_button = XtCreateManagedWidget( "style", commandWidgetClass,
  44.                 cmds, arg, narg );
  45.     InitStylePopup(pane);
  46.  
  47.     callback[0].callback = Zoom;
  48.     callback[0].closure = (caddr_t) pane;
  49.     narg = 0;
  50.     XtSetArg( arg[narg], XtNcallback, callback ); narg++;
  51.     XtSetArg( arg[narg], XtNlabel, "zoom in" ); narg++;
  52.     XtSetArg( arg[narg], XtNsensitive, False ); narg++;
  53.     pane->zoomcmd = XtCreateManagedWidget( "zoom", commandWidgetClass,
  54.                 cmds, arg, narg );
  55.  
  56.     callback[0].callback = DeleteSignal;
  57.     callback[0].closure = (caddr_t) pane;
  58.     narg = 0;
  59.     XtSetArg( arg[narg], XtNcallback, callback ); narg++;
  60.     XtSetArg( arg[narg], XtNlabel, "delete"); narg++;
  61.     XtSetArg( arg[narg], XtNsensitive, False ); narg++;
  62.     pane->delcmd = XtCreateManagedWidget("delete_marked", commandWidgetClass,
  63.                 cmds, (ArgList)arg, narg);
  64. }
  65.