home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / x / volume2 / xscope / part01 / OpenSignal.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-04-28  |  1.2 KB  |  38 lines
  1. #include "xsignal.h"
  2. /* ARGSUSED */
  3. void OpenSignal(button, pane, data2)
  4.     Widget button;
  5.     sigbox *pane;
  6.     caddr_t data2; /* Unused */
  7. {
  8.     int i,x,y;
  9.     Arg arg[5];
  10.     static XtCallbackRec callback[2];
  11.     Widget dialog,child,box;
  12.  
  13.     XTranslateCoordinates(XtDisplay(button), XtWindow(button),
  14.         XDefaultRootWindow(XtDisplay(button)),
  15.         5,5,&x,&y,&child);
  16.     i=0;
  17.     XtSetArg( arg[i], XtNx, x); i++;
  18.     XtSetArg( arg[i], XtNy, y); i++;
  19.     pane->file=XtCreateApplicationShell( "xfile", topLevelShellWidgetClass,
  20.                     arg, i );
  21.     i=0;
  22.     XtSetArg( arg[i], XtNwidth, WIDTH-10); i++;
  23.     box = XtCreateManagedWidget( "file", boxWidgetClass, pane->file, arg, i );
  24.  
  25.     i=0;
  26.     XtSetArg(arg[i], XtNlabel, "Signal File Name:                      "); i++;
  27.     XtSetArg(arg[i], XtNvalue, ""); i++;
  28.     dialog = XtCreateManagedWidget( "file", dialogWidgetClass, box, arg, i );
  29.     callback[0].callback = NewSignal;
  30.     callback[0].closure = (caddr_t) pane;
  31.     i=0;
  32.     XtSetArg(arg[i], XtNlabel, "ok"); i++;
  33.     XtSetArg(arg[i], XtNcallback, callback); i++;
  34.     XtCreateManagedWidget( "file_ok",
  35.             commandWidgetClass, dialog, arg, i );
  36.     XtRealizeWidget(pane->file);
  37. }
  38.