Widgets.cpp

/* $Id: Widgets.cpp,v 1.15 2000-12-05 18:54:11 geuzaine Exp $ */

#include "Gmsh.h"
#include "GmshUI.h"
#include "Mesh.h"
#include "Context.h"
#include "XContext.h"
#include "Info.h"
#include "Widgets.h"
#include "Help.h"

extern Context_T   CTX ;
extern XContext_T  XCTX ;

/* hardcoded this one, since it is required for the motion handling */

static char DrawingAreaTranslations[] = "#replace\n\
~s ~m ~a <Key>Return:DrawingAreaInput() ManagerParentActivate()\n\
<Key>Return:DrawingAreaInput() ManagerGadgetSelect()\n\
<Key>osfActivate:DrawingAreaInput() ManagerParentActivate()\n\
<Key>osfCancel:DrawingAreaInput() ManagerParentCancel()\n\
<Key>osfHelp:DrawingAreaInput() ManagerGadgetHelp()\n\
<Key>space:DrawingAreaInput() ManagerGadgetSelect()\n\
<Key>osfSelect:DrawingAreaInput() ManagerGadgetSelect()\n\
<KeyDown>:DrawingAreaInput() ManagerGadgetKeyInput()\n\
<KeyUp>:DrawingAreaInput()\n\
<BtnMotion>:DrawingAreaInput() ManagerGadgetButtonMotion()\n\
<Motion>:DrawingAreaInput() ManagerGadgetButtonMotion()\n\
<Btn1Down>:DrawingAreaInput() ManagerGadgetArm()\n\
<Btn1Up>:DrawingAreaInput() ManagerGadgetActivate()\n\
<Btn2Down>:DrawingAreaInput() ManagerGadgetDrag()\n\
<BtnDown>:DrawingAreaInput()\n\
<BtnUp>:DrawingAreaInput()";

/* ------------------------------------------------------------------------ 
    MENU WINDOW
   ------------------------------------------------------------------------ */

void CreateWidgets_M(Widgets_T *w){
  int   i, n ;
  Arg   arg[10] ;

  /* menu shell */
  w->M.shell = 
    XtVaAppCreateShell("Gmsh", "gmshMW", applicationShellWidgetClass, XCTX.display, 
                       XmNvisual, XCTX.gui.visual,
                       XmNcolormap, XCTX.gui.colormap,
                       NULL);
  
  /* menu main window */
  i=0;
  w->M.containerWin = XmCreateMainWindow(w->M.shell, "McontainerWin", arg, i);
  XtManageChild(w->M.containerWin);
  
  /* menu bar */
  i=0;
  w->M.menuBar = XmCreateMenuBar(w->M.containerWin, "MmenuBar", arg, i);
  XtManageChild(w->M.menuBar);

  /* file menu */
  i=0;
  w->M.filePane = XmCreatePulldownMenu(w->M.menuBar, "MfilePane", arg, i);
                                        
  i=0;
  XtSetArg(arg[i], XmNlabelString, XmStringCreateSimple("Open")); i++;
  XtSetArg(arg[i], XmNacceleratorText, XmStringCreateSimple("(C-o)")); i++;
  XtSetArg(arg[i], XmNaccelerator, "Ctrl<Key>o:"); i++;
  w->M.fileButt[0] = XmCreatePushButton(w->M.filePane, "MfileButt0", arg, i);
  XtManageChild(w->M.fileButt[0]);