Import Geant4 0.0.0 source tree
This commit is contained in:
@@ -0,0 +1,89 @@
|
||||
// This code implementation is the intellectual property of
|
||||
// the RD44 GEANT4 collaboration.
|
||||
//
|
||||
// By copying, distributing or modifying the Program (or any work
|
||||
// based on the Program) you indicate your acceptance of this statement,
|
||||
// and all its terms.
|
||||
//
|
||||
// $Id: G4OpenGLXmBox.cc,v 2.1 1998/07/13 17:11:44 urbi Exp $
|
||||
// GEANT4 tag $Name: geant4-00 $
|
||||
//
|
||||
//Box container class
|
||||
|
||||
#ifdef G4VIS_BUILD_OPENGLXM_DRIVER
|
||||
|
||||
#include "G4OpenGLXmFramedBox.hh"
|
||||
#include "G4OpenGLXmBox.hh"
|
||||
#include "G4OpenGLXmVWidgetComponent.hh"
|
||||
#include "G4OpenGLXmVWidgetShell.hh"
|
||||
|
||||
G4OpenGLXmBox::G4OpenGLXmBox (char* n,
|
||||
G4bool r)
|
||||
{
|
||||
name = n;
|
||||
radio = r;
|
||||
parent = NULL;
|
||||
box_row_col = NULL;
|
||||
}
|
||||
|
||||
G4OpenGLXmBox::~G4OpenGLXmBox ()
|
||||
{}
|
||||
|
||||
void G4OpenGLXmBox::AddChild (G4OpenGLXmVWidgetComponent* component)
|
||||
{
|
||||
component->AddYourselfTo(this);
|
||||
Cardinal num_children;
|
||||
XtVaGetValues (box_row_col,
|
||||
XmNnumChildren, &num_children,
|
||||
NULL);
|
||||
// G4cout << name << " now parents " << num_children << " children." << endl;
|
||||
}
|
||||
|
||||
void G4OpenGLXmBox::AddYourselfTo (G4OpenGLXmVWidgetShell* window)
|
||||
{
|
||||
|
||||
pView = window->GetView ();
|
||||
ProcesspView ();
|
||||
parent = window->GetPointerToWidget ();
|
||||
|
||||
box_row_col = XtVaCreateManagedWidget (name,
|
||||
xmRowColumnWidgetClass,
|
||||
*parent,
|
||||
|
||||
XmNadjustMargin, True,
|
||||
XmNisHomogeneous, False,
|
||||
XmNlabelString, (XmString)name,
|
||||
XmNradioAlwaysOne, radio,
|
||||
XmNradioBehavior, radio,
|
||||
|
||||
XtNvisual, visual,
|
||||
XtNdepth, depth,
|
||||
XtNcolormap, cmap,
|
||||
XtNborderColor, borcol,
|
||||
XtNbackground, bgnd,
|
||||
|
||||
NULL);
|
||||
|
||||
}
|
||||
|
||||
Widget* G4OpenGLXmBox::GetPointerToParent ()
|
||||
{
|
||||
return parent;
|
||||
}
|
||||
|
||||
Widget* G4OpenGLXmBox::GetPointerToWidget ()
|
||||
{
|
||||
return &box_row_col;
|
||||
}
|
||||
|
||||
char* G4OpenGLXmBox::GetName ()
|
||||
{
|
||||
return name;
|
||||
}
|
||||
|
||||
void G4OpenGLXmBox::SetName (char* n)
|
||||
{
|
||||
name = n;
|
||||
}
|
||||
|
||||
#endif
|
||||
Reference in New Issue
Block a user