Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/visualization/OpenGL/src/G4OpenGLXmTopLevelShell.cc

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ]

  1 //
  2 // ********************************************************************
  3 // * License and Disclaimer                                           *
  4 // *                                                                  *
  5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
  6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
  7 // * conditions of the Geant4 Software License,  included in the file *
  8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
  9 // * include a list of copyright holders.                             *
 10 // *                                                                  *
 11 // * Neither the authors of this software system, nor their employing *
 12 // * institutes,nor the agencies providing financial support for this *
 13 // * work  make  any representation or  warranty, express or implied, *
 14 // * regarding  this  software system or assume any liability for its *
 15 // * use.  Please see the license in the file  LICENSE  and URL above *
 16 // * for the full disclaimer and the limitation of liability.         *
 17 // *                                                                  *
 18 // * This  code  implementation is the result of  the  scientific and *
 19 // * technical work of the GEANT4 collaboration.                      *
 20 // * By using,  copying,  modifying or  distributing the software (or *
 21 // * any work based  on the software)  you  agree  to acknowledge its *
 22 // * use  in  resulting  scientific  publications,  and indicate your *
 23 // * acceptance of all terms of the Geant4 Software license.          *
 24 // ********************************************************************
 25 //
 26 //
 27 //
 28 //Top level shell class
 29 
 30 #include "G4OpenGLXmViewer.hh"
 31 #include "G4OpenGLXmTopLevelShell.hh"
 32 #include "G4OpenGLXmVWidgetContainer.hh"
 33 
 34 #include <Xm/Frame.h>
 35 #include <Xm/RowColumn.h>
 36 
 37 G4OpenGLXmTopLevelShell::G4OpenGLXmTopLevelShell (G4OpenGLXmViewer* v,
 38               char* n) 
 39 {
 40   pView = v;
 41   ProcesspView ();
 42   name = n;
 43   toplevel = XtVaCreatePopupShell 
 44     (name,
 45      topLevelShellWidgetClass,
 46      top,
 47      
 48      XtNiconName, name,
 49      XtNtitle, name,
 50      XmNdeleteResponse, XmDO_NOTHING,
 51      XmNisHomogeneous, False,
 52      
 53      XtNvisual, visual, 
 54      XtNdepth, depth, 
 55      XtNcolormap, cmap, 
 56      XtNborderColor, borcol,
 57      XtNbackground, bgnd,
 58      NULL);
 59 
 60   frame = XtVaCreateManagedWidget (name,
 61            xmFrameWidgetClass,
 62            toplevel,
 63            
 64            XtNvisual, visual,
 65            XtNdepth, depth,
 66            XtNcolormap, cmap,
 67            XtNborderColor, borcol,
 68            XtNbackground, bgnd,
 69            
 70            NULL);
 71   
 72   
 73   
 74   top_box =  XtVaCreateManagedWidget (name,
 75               xmRowColumnWidgetClass,
 76               frame,
 77               
 78               XmNadjustMargin, True,
 79               XmNisHomogeneous, False,
 80               
 81               XtNvisual, visual,
 82               XtNdepth, depth,
 83               XtNcolormap, cmap,
 84               XtNborderColor, borcol,
 85               XtNbackground, bgnd,
 86               
 87               NULL);  
 88 
 89 }
 90 
 91 G4OpenGLXmTopLevelShell::~G4OpenGLXmTopLevelShell ()
 92 {
 93   XtDestroyWidget (toplevel);
 94 }
 95 
 96 void G4OpenGLXmTopLevelShell::AddChild (G4OpenGLXmVWidgetContainer* container)
 97 {
 98   container->AddYourselfTo (this);
 99 }
100 
101 void G4OpenGLXmTopLevelShell::Realize () 
102 {
103   Cardinal num_children;
104   XtVaGetValues (toplevel,
105      XmNnumChildren, &num_children,
106      NULL);
107 //  G4cout << name << " now parents " << num_children << " children." << G4endl;
108   XtManageChild (toplevel);
109   XtRealizeWidget (toplevel);
110   XtPopup (toplevel, XtGrabNonexclusive);
111 }
112 
113 Widget* G4OpenGLXmTopLevelShell::GetPointerToWidget ()
114 {
115   return &top_box;
116 }
117 
118 char* G4OpenGLXmTopLevelShell::GetName ()
119 {
120   return name;
121 }
122