home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume2 / xscope / part01 / InitEnd.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-04-28  |  1.6 KB  |  47 lines
  1. #include "xsignal.h"
  2.  
  3. void init_end(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.     float shown,top;
  9.     Widget box;
  10.     int narg;
  11.     Arg arg[10];
  12.  
  13.     narg = 0;
  14.     box = XtCreateManagedWidget("bend", boxWidgetClass, pane->box,
  15.                     arg, narg);
  16.     narg = 0;
  17.     XtSetArg( arg[narg], XtNlabel, "Ending Sample:" ); narg++;
  18.     XtSetArg( arg[narg], XtNvalue, "" ); narg++;
  19.     pane->dlast = XtCreateManagedWidget("last", dialogWidgetClass,
  20.                     box, arg, narg);
  21.     callback[0].callback = NewEnd;
  22.     callback[0].closure = (caddr_t) pane;
  23.     narg = 0;
  24.     XtSetArg( arg[narg], XtNcallback, callback ); narg++;
  25.     XtSetArg( arg[narg], XtNlabel, "ok" ); narg++;
  26.     XtCreateManagedWidget("ok", commandWidgetClass,
  27.                     pane->dlast, arg, narg);
  28.  
  29.     narg = 0;
  30.     XtSetArg( arg[narg], XtNlabel, "0"); narg++;
  31.     pane->endval = XtCreateManagedWidget( "label", labelWidgetClass,
  32.                     box, arg, narg );
  33.         callback[0].callback = Scrolled2;
  34.         callback[0].closure = (caddr_t) pane;
  35.         thumbcall[0].callback = Thumbed2;
  36.         thumbcall[0].closure = (caddr_t) pane;
  37.     narg = 0;
  38.         XtSetArg( arg[narg], XtNlength, 200 ); narg++;
  39.         XtSetArg( arg[narg], XtNscrollProc, callback ); narg++;
  40.         XtSetArg( arg[narg], XtNthumbProc, thumbcall ); narg++;
  41.         XtSetArg( arg[narg], XtNorientation, XtorientHorizontal ); narg++;
  42.     XtSetArg( arg[narg], XtNsensitive, False ); narg++;
  43.         pane->sb_last = XtCreateManagedWidget("sb_last", scrollbarWidgetClass,
  44.                     box, arg,narg);
  45.  
  46. }
  47.