Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,84 @@
+// 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: G4OpenGLXmFramedBox.cc,v 2.1 1998/07/13 17:11:45 urbi Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+//Framed box container class
+
+#ifdef G4VIS_BUILD_OPENGLXM_DRIVER
+
+#include "G4OpenGLXmBox.hh"
+#include "G4OpenGLXmFramedBox.hh"
+#include "G4OpenGLXmVWidgetComponent.hh"
+#include "G4OpenGLXmVWidgetShell.hh"
+
+G4OpenGLXmFramedBox::G4OpenGLXmFramedBox (char* n, 
+					  G4bool r) :
+G4OpenGLXmBox (n, r)
+{
+  frame = NULL;
+}
+
+G4OpenGLXmFramedBox::~G4OpenGLXmFramedBox () 
+{}
+
+void G4OpenGLXmFramedBox::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 G4OpenGLXmFramedBox::AddYourselfTo (G4OpenGLXmVWidgetShell* window)
+{
+
+  pView = window->GetView ();
+  ProcesspView ();
+  char framename[50];
+  strcpy (framename, name);
+  strcat (framename, "_frame");
+
+  parent = window->GetPointerToWidget ();
+  frame = XtVaCreateManagedWidget (framename,
+				    xmFrameWidgetClass,
+				    *parent,
+				    
+				    XtNvisual, visual,
+				    XtNdepth, depth,
+				    XtNcolormap, cmap,
+				    XtNborderColor, borcol,
+				    XtNbackground, bgnd,
+				    
+				    NULL);
+  
+  
+  
+  box_row_col =  XtVaCreateManagedWidget (name,
+					  xmRowColumnWidgetClass,
+					  frame,
+					  
+					  XmNadjustMargin, True,
+					  XmNisHomogeneous, False,
+					  XmNlabelString, (XmString)name,
+					  XmNradioAlwaysOne, radio,
+					  XmNradioBehavior, radio,
+					  
+					  XtNvisual, visual,
+					  XtNdepth, depth,
+					  XtNcolormap, cmap,
+					  XtNborderColor, borcol,
+					  XtNbackground, bgnd,
+					  
+					  NULL);
+  
+}
+
+#endif