Index: trunk/MagicSoft/Mars/mgui/GuiIncl.h =================================================================== --- trunk/MagicSoft/Mars/mgui/GuiIncl.h (revision 710) +++ trunk/MagicSoft/Mars/mgui/GuiIncl.h (revision 714) @@ -1,14 +1,3 @@ #ifndef __CINT__ -#include // TGPictureButton -#include // TGTab -#include // TGPopupMenu -#include // TGMsgBox -#include // TGListBox -#include // TGListBox -#include // TGHorizontal3DLine -#include // TGFileContainer -#include // TGLabel -#include - #endif // __CINT__ Index: trunk/MagicSoft/Mars/mgui/GuiLinkDef.h =================================================================== --- trunk/MagicSoft/Mars/mgui/GuiLinkDef.h (revision 710) +++ trunk/MagicSoft/Mars/mgui/GuiLinkDef.h (revision 714) @@ -4,11 +4,4 @@ #pragma link off all classes; #pragma link off all functions; - -#pragma link C++ class MGMarsMain; -#pragma link C++ class MGEventDispMain; -#pragma link C++ class MGDataCheckMain; -#pragma link C++ class MGMonteCarloMain; - -#pragma link C++ class MGPrototyp; #pragma link C++ class MHexagon; Index: trunk/MagicSoft/Mars/mgui/MCamDisplay.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MCamDisplay.h (revision 710) +++ trunk/MagicSoft/Mars/mgui/MCamDisplay.h (revision 714) @@ -20,7 +20,7 @@ class TBox; class TText; -class TClonesArray ; +class TClonesArray; -class MCerPhotEvt ; +class MCerPhotEvt; class MGeomCam; @@ -28,14 +28,14 @@ { private: - Bool_t fAutoScale ; //! indicating the autoscale function + Bool_t fAutoScale; //! indicating the autoscale function - UInt_t fNumPixels ; //! - TClonesArray *fPixels ; //! + UInt_t fNumPixels; //! + TClonesArray *fPixels ; //! - Float_t fMinPhe ; //! The minimal number of Phe - Float_t fMaxPhe ; //! The maximum number of Phe + Float_t fMinPhe; //! The minimal number of Phe + Float_t fMaxPhe; //! The maximum number of Phe - TClonesArray *fLegend ; //! - TClonesArray *fLegText ; //! + TClonesArray *fLegend; //! + TClonesArray *fLegText; //! TBox *GetBox(Int_t i) { return (TBox*) fLegend->At(i); } @@ -51,24 +51,24 @@ MCamDisplay (MGeomCam *geom); - ~MCamDisplay () ; + ~MCamDisplay (); - void Init() ; + void Init(); - void Draw(Option_t *option = "" ) ; + void Draw(Option_t *option = "" ); - void DrawPhotNum( MCerPhotEvt *event) ; - void DrawPhotErr( MCerPhotEvt *event) ; + void DrawPhotNum( MCerPhotEvt *event); + void DrawPhotErr( MCerPhotEvt *event); - void Reset() ; + void Reset(); MHexagon &operator[](int i) { return *((MHexagon*)fPixels->At(i)); } - Int_t GetColor( Float_t wert ) ; + Int_t GetColor( Float_t wert ); - void UpdateLegend() ; + void UpdateLegend(); void SetAutoScale (Bool_t input = kTRUE ) { - fAutoScale = input ; + fAutoScale = input; } Index: trunk/MagicSoft/Mars/mgui/MGDataCheckMain.cc =================================================================== --- trunk/MagicSoft/Mars/mgui/MGDataCheckMain.cc (revision 710) +++ (revision ) @@ -1,464 +1,0 @@ -#include "MGDataCheckMain.h" - -#include // gSystem - -#include // TGTab -#include // TGPopupMenu -#include // TGTextButton -#include // TGMsgBox -#include // TGListBox -#include // TGFileContainer - -// FIXME: Move to MAGIC.h -#define S_ISDIR(m) (((m)&(0170000)) == (0040000)) - -ClassImp(MGDataCheckMain) - -enum CommandDataChecker { - M_FILE_CLOSE , - M_BUTTON_PEDADC, - M_BUTTON_CRADC, - M_BUTTON_PEDTDC, - M_BUTTON_CRTDC, - - M_PBUTTON_CDIR_UP, - M_PBUTTON_LIST_MODE, - M_PBUTTON_DETAIL_MODE -} ; - - -MGDataCheckMain::MGDataCheckMain(const TGWindow *p, const TGWindow *main, - UInt_t w, UInt_t h ) - : TGTransientFrame(p, main, w, h ) -{ - // - // Main window to controll the october test - // - - // set non-gui members to starting values - - sprintf ( fInputFile, "\n" ) ; - - // - // First create the MenuBar. - // - - // Layout objects for menue. - - fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; - fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; - - // crate the menu bar - - fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; - fFileMenu->AddEntry ("Close", M_FILE_CLOSE ) ; - fFileMenu->Associate(this) ; - - // the button messages are handled by main frame (this) - - fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; - fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; - AddFrame(fMenuBar, fLayMenuBar ) ; - - // - // Create the top window with a lot of buttons - // - - fFrameTop = new TGCompositeFrame (this, 300,100, kVerticalFrame ) ; - - fTop1 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fFrameTop->AddFrame (fTop1, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - fTop2 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fButPedADC = new TGTextButton(fTop2, "ADC Spectra of Pedestals", M_BUTTON_PEDADC ); - fButPedADC->Associate(this) ; - fTop2->AddFrame (fButPedADC, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fButCrADC = new TGTextButton(fTop2, "ADC Specta of Cosmics", M_BUTTON_CRADC ); - fButCrADC->Associate(this) ; - fTop2->AddFrame (fButCrADC, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fFrameTop->AddFrame (fTop2, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - fTop3 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fButPedTDC = new TGTextButton(fTop3, "TDC Spectra of Pedestals", M_BUTTON_PEDTDC ); - fButPedTDC->Associate(this) ; - fTop3->AddFrame (fButPedTDC, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fButCrTDC = new TGTextButton(fTop3, "TDC Specta of Cosmics", M_BUTTON_CRTDC ); - fButCrTDC->Associate(this) ; - fTop3->AddFrame (fButCrTDC, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fFrameTop->AddFrame (fTop3, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - AddFrame(fFrameTop, new TGLayoutHints (kLHintsTop ) ) ; - - - // - // Create the low window with a tabs in it - // - - fFrameLow = new TGCompositeFrame (this, 300,100, kHorizontalFrame ) ; - - fLayTab = new TGLayoutHints ( kLHintsExpandX , 5, 5, 5, 5 ) ; - - // create the first tab - - fTab = new TGTab ( fFrameLow, 400, 400 ) ; - - TGCompositeFrame *tf = fTab->AddTab("Input File") ; - - fTabF1 = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - // tf->AddFrame(fTabF1, fLayTab ) ; - - - fTabF1a = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1a, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1b = new TGCompositeFrame (tf, 100, 100, kVerticalFrame) ; - // tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - - - fDir = new TGListBox(fTabF1a, -1) ; - fDir->Resize(350,20) ; - char temp[100] ; - // sprintf ( temp, "%s", START_DIRECTORY ) ; - sprintf ( temp, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(temp, 1) ; - fTabF1a->AddFrame( fDir, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - - fPicCdup = fClient->GetPicture("tb_uplevel.xpm") ; - fCdup = new TGPictureButton(fTabF1a, fPicCdup, M_PBUTTON_CDIR_UP ) ; - fCdup->SetToolTipText("One Level up!") ; - fCdup->Associate(this) ; - fTabF1a->AddFrame (fCdup, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicList = fClient->GetPicture("tb_list.xpm") ; - fListMode = new TGPictureButton(fTabF1a, fPicList, M_PBUTTON_LIST_MODE ) ; - fListMode->SetToolTipText("List Mode") ; - fListMode->Associate(this) ; - fListMode->SetState(kButtonUp) ; - fListMode->AllowStayDown(kTRUE) ; - fListMode->AllowStayDown(kTRUE) ; fTabF1a->AddFrame (fListMode, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicDetail = fClient->GetPicture("tb_details.xpm") ; - fDetail = new TGPictureButton(fTabF1a, fPicDetail, M_PBUTTON_DETAIL_MODE ) ; - fDetail->SetToolTipText("Details Mode") ; - fDetail->Associate(this) ; - fDetail->SetState(kButtonEngaged) ; - fDetail->AllowStayDown(kTRUE) ; - fTabF1a->AddFrame (fDetail, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - - fFileView = new TGListView(fTabF1b, 540, 380 ) ; - fFileCont = new TGFileContainer(fFileView->GetViewPort(), 100, 100, - kVerticalFrame, fgWhitePixel) ; - - fFileCont->Associate(this) ; - fFileView->GetViewPort()->SetBackgroundColor(fgWhitePixel) ; - fFileView->SetContainer(fFileCont) ; - fFileCont->SetFilter("*") ; - // fFileCont->ChangeDirectory(START_DIRECTORY) ; - fFileCont->ChangeDirectory(gSystem->WorkingDirectory()) ; - fFileView->SetViewMode(kLVDetails); - fFileCont->Sort(kSortByName) ; - - fTabF1b->AddFrame(fFileView, new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ) ; - - tf->AddFrame(fTabF1, fLayTab) ; - - fFrameLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); - - AddFrame(fFrameLow, new TGLayoutHints (kLHintsExpandX|kLHintsExpandY) ) ; - - // - // Map the window, set up the layout, etc. - // - - SetWMSizeHints(400, 350, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame - - MapSubwindows(); - - Layout(); - - SetWindowName("DataCheck Window"); - SetIconName("DataCheck"); - - MapWindow(); - -} - - -// ====================================================================== -// ====================================================================== - -MGDataCheckMain::~MGDataCheckMain() -{ - //delete fPicCdup, fPicList, fPicDetail; - delete fLayTab; - delete fLayMenuBar; - delete fLayMenuItem; - delete fFileView; - delete fFileCont; - delete fCdup; - delete fListMode; - delete fDetail; - delete fDir ; - delete fTabF1b; - delete fTabF1a; - delete fTabF1; - delete fButPedADC; - delete fButCrADC; - delete fButPedTDC; - delete fButCrTDC; - delete fTop3; - delete fTop2; - delete fTop1; - delete fTab; - delete fFrameTop; - delete fFrameLow; - delete fFileMenu; - delete fMenuBar; - -} - - -// ====================================================================== -// ====================================================================== - -void MGDataCheckMain::CloseWindow() -{ - // Got close message for this MainFrame. Calls parent CloseWindow() - // (which destroys the window) and terminate the application. - // The close message is generated by the window manager when its close - // window menu item is selected. - - delete this ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGDataCheckMain::InputFileSelected() -{ - // Checks if there is a selected input root file - - if ( strcmp ( fInputFile, "\n") == 0 ) - { - return kFALSE ; - } - - return kTRUE ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGDataCheckMain::ProcessMessage(Long_t msg, Long_t parm1, Long_t) -{ - // Process events generated by the buttons in the frame. - - Int_t buttons = 4, retval = 0 ; - Char_t wort[100] ; - Char_t extens[5] ; - Char_t command[110] ; - - TGFileItem *item ; // to process items in the file view container - void *np = NULL ; // null pointer - - switch (GET_MSG(msg)) - { - case kC_COMMAND: - switch (GET_SUBMSG(msg)) - { - case kCM_BUTTON: - - switch (parm1) - { - - case M_BUTTON_PEDADC: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - fViewAdc.AdcSpectra(fInputFile, "PedEvents" ) ; - - break ; - - - case M_BUTTON_CRADC: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - fViewAdc.AdcSpectra(fInputFile, "Events" ) ; - - break ; - - case M_BUTTON_PEDTDC: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - // fOctober.PedTdcSpectra(fInputFile) ; - - break ; - - case M_BUTTON_CRTDC: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - - - break ; - - case M_PBUTTON_CDIR_UP : - - // goto the parent directory - - gSystem->ChangeDirectory("..") ; - fDir->RemoveEntry(1) ; - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(wort,1) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - fFileCont->ChangeDirectory( wort ) ; - fFileCont->DisplayDirectory() ; - - break ; - - case M_PBUTTON_LIST_MODE: - fFileView->SetViewMode(kLVList) ; - fDetail->SetState(kButtonUp) ; - - break ; - - case M_PBUTTON_DETAIL_MODE: - fFileView->SetViewMode(kLVDetails) ; - fListMode->SetState(kButtonUp) ; - - break ; - - default: - break ; - } - - case kCM_MENU: - - switch (parm1) { - case M_FILE_CLOSE: - CloseWindow() ; - - break; - } - break ; - - default: - break ; - - } - - case kC_CONTAINER: - switch (GET_SUBMSG(msg)) { - - // case kCT_ITEMCLICK: - // printf ("itemclick\n"); - // break; - - - case kCT_ITEMDBLCLICK: - // - // process the double click in the file view container - // - - if ( parm1 == kButton1) { - if ( fFileCont->NumSelected() == 1 ) { - // - // one file selected - // - item = (TGFileItem *) fFileCont->GetNextSelected(&np) ; - - if ( S_ISDIR(item->GetType()) ) // file is directory - { - // goto directory - - sprintf (wort, "%s", item->GetItemName()->GetString()) ; - fFileCont->ChangeDirectory ( wort ) ; - gSystem->ChangeDirectory( wort ) ; - - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->RemoveEntry(1) ; - fDir->AddEntry( wort, 1 ) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - } - else // file is no directory, is a file - { - sprintf (wort, "%s", item->GetItemName()->GetString() ) ; - - // determine the file type by extensions - - for (Int_t i = 0 ; i<5; i++) - extens[i] = '\0' ; - - for ( Int_t i=0; wort[i] != '\0'; i++) { - if ( wort[i] == '.') { - strncpy (extens, &wort[i+1], 4 ) ; - break ; - } - } - - if ( ! strcmp(extens, "ps") ) { // postscript file - sprintf ( command, "gv %s/%s &", - gSystem->WorkingDirectory(), - wort ) ; - gSystem->Exec(command) ; - break ; - } - else if ( ! strcmp(extens, "root") ) { // root file - sprintf ( fInputFile, "%s/%s" , gSystem->WorkingDirectory(), wort ) ; - - printf (" %s \n", fInputFile ) ; - break ; - } - - } - } - } - break; - - default: - break ; - } - - - - default: - break; - } - return kTRUE; -} Index: trunk/MagicSoft/Mars/mgui/MGDataCheckMain.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MGDataCheckMain.h (revision 710) +++ (revision ) @@ -1,94 +1,0 @@ -#ifndef MGDATACHECKMAIN_H -#define MGDATACHECKMAIN_H - -#ifndef MAGIC_H -#include "MAGIC.h" -#endif - -#ifndef ROOT_TGFrame -#include -#endif - -#ifndef MVIEWADCSPECTRA_H -#include "MViewAdcSpectra.h" -#endif - -class TGMenuBar; -class TGPopupMenu; -class TGTab; -class TGTextButton; -class TGListBox; -class TGPictureButton; -class TGFileContainer; -class TGListView; - -class MGDataCheckMain : public TGTransientFrame { - private: - - // - // Create a main frame with a number of different buttons. - // - - // some member not connected with Gui - - Char_t fInputFile[256] ; - MViewAdcSpectra fViewAdc ; //! - - // the things for the menu bar - - TGMenuBar *fMenuBar ; - TGPopupMenu *fFileMenu ; - - // divide the Window in two different parts - - TGCompositeFrame *fFrameTop ; // top part of the main window - TGCompositeFrame *fFrameLow ; // low part of the main window - TGTab *fTab ; // different tabs in the low window - - // the horizontal frame in the top part - - TGHorizontalFrame *fTop1, *fTop2, *fTop3 ; - - // the buttons in the Top Part - - TGTextButton *fButPedADC, *fButCrADC ; - TGTextButton *fButPedTDC, *fButCrTDC ; - - // the things in the file selector - - TGCompositeFrame *fTabF1 ; // first tab of low part - TGCompositeFrame *fTabF1a, *fTabF1b ; // subpart of the file selector in low window - TGListBox *fDir ; - TGPictureButton *fCdup, *fListMode, *fDetail ; - TGFileContainer *fFileCont ; - TGListView *fFileView ; - - // Layout hints for different uses - - TGLayoutHints *fLayMenuBar, *fLayMenuItem ; - TGLayoutHints *fLayTab ; - - // some icons and pictures often used - - const TGPicture *fPicCdup; //! - const TGPicture *fPicList; //! - const TGPicture *fPicDetail; //! - - public: - MGDataCheckMain(const TGWindow *p, const TGWindow *main, UInt_t w, UInt_t h) ; - - ~MGDataCheckMain(); - - void CloseWindow() ; - - Bool_t InputFileSelected() ; - - Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); - - ClassDef(MGDataCheckMain, 0) - -} ; - -#endif - - Index: trunk/MagicSoft/Mars/mgui/MGEventDispMain.cc =================================================================== --- trunk/MagicSoft/Mars/mgui/MGEventDispMain.cc (revision 710) +++ (revision ) @@ -1,492 +1,0 @@ -#include "MGEventDispMain.h" - -#include // gSystem - -#include // TGTab -#include // TGPopupMenu -#include // TGTextButton -#include // TGMsgBox -#include // TGListBox -#include // TGFileContainer -#include // TGHorizontal3DLine -#include -#include // TGLabel - -#include "MGFadcDisp.h" - -// FIXME: Move to MAGIC.h -#define S_ISDIR(m) (((m)&(0170000)) == (0040000)) - -ClassImp(MGEventDispMain) - -enum CommandEventDispMain { - M_FILE_CLOSE , - M_BUT_DISP1_EVT, - M_BUT_DISP1_PED, - M_BUT_DISP1_CAL, - - M_FILERESET, - M_PBUTTON_CDIR_UP, - M_PBUTTON_LIST_MODE, - M_PBUTTON_DETAIL_MODE -} ; - - -MGEventDispMain::MGEventDispMain(const TGWindow *p, const TGWindow *main, - UInt_t w, UInt_t h ) - : TGTransientFrame(p, main, w, h ) -{ - // - // Main window to controll the october test - // - - // set non-gui members to starting values - - sprintf ( fInputFile, "\n" ) ; - - // - // First create the MenuBar. - // - - // Layout objects for menue. - - fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; - fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; - - // crate the menu bar - - fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; - fFileMenu->AddEntry ("Close", M_FILE_CLOSE ) ; - fFileMenu->Associate(this) ; - - // the button messages are handled by main frame (this) - - fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; - fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; - AddFrame(fMenuBar, fLayMenuBar ) ; - - fLineSep1 = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep1, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - - // - // Create the top window with a lot of buttons - // - - fFrameTop = new TGCompositeFrame (this, 300,100, kVerticalFrame ) ; - - fTop1 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fButFadcDispEvts = new TGTextButton(fTop1, "FADC Disp for Events", M_BUT_DISP1_EVT ); - fButFadcDispEvts->Associate(this) ; - fTop1->AddFrame (fButFadcDispEvts, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fButFadcDispPed = new TGTextButton(fTop1, "FADC Disp for PedEvts", M_BUT_DISP1_PED ); - fButFadcDispPed->Associate(this) ; - fTop1->AddFrame (fButFadcDispPed, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fButFadcDispCal = new TGTextButton(fTop1, "FADC Disp for CalEvts", M_BUT_DISP1_CAL ); - fButFadcDispCal->Associate(this) ; - fTop1->AddFrame (fButFadcDispCal, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - - - fFrameTop->AddFrame (fTop1, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - AddFrame(fFrameTop, new TGLayoutHints (kLHintsTop ) ) ; - - // a line between top and low frame - - fLineSep2 = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - // - // Create the low window with a tabs in it - // - - fFrameLow = new TGCompositeFrame (this, 300,100, kHorizontalFrame ) ; - - fLayTab = new TGLayoutHints ( kLHintsExpandX , 5, 5, 5, 5 ) ; - - // create the first tab - - fTab = new TGTab ( fFrameLow, 400, 400 ) ; - - TGCompositeFrame *tf = fTab->AddTab("Input File") ; - - fTabF1 = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - // tf->AddFrame(fTabF1, fLayTab ) ; - - fTabF1a = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1a, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1b = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1c = new TGCompositeFrame (tf, 100, 100, kVerticalFrame) ; - // tf->AddFrame(fTabF1c, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - tf->AddFrame(fTabF1c, new TGLayoutHints ( kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - - // the items in the first subframe - - fLabFileName = new TGLabel(fTabF1a, new TGString("selected File:") ); - fTabF1a->AddFrame( fLabFileName, new TGLayoutHints (kLHintsLeft, 10, 10, 10, 10)) ; - - fTxtFileName = new TGTextEntry(fTabF1a, fTxtBufFileName = new TGTextBuffer(100) ); - fTxtFileName->Resize(60, fTxtFileName->GetDefaultHeight()); - fTabF1a->AddFrame(fTxtFileName, new TGLayoutHints(kLHintsTop | kLHintsExpandX, 5, 5, 5, 5)); - - fButFileReset = new TGTextButton (fTabF1a, "Reset", M_FILERESET ) ; - fButFileReset->Associate(this) ; - fTabF1a->AddFrame (fButFileReset, new TGLayoutHints (kLHintsRight, 10, 10, 10, 10 ) ) ; - - - - // the items in the second subfraem - - fLabDir = new TGLabel(fTabF1b, new TGString("Directory:") ); - fTabF1b->AddFrame( fLabDir, new TGLayoutHints (kLHintsLeft, 10, 10, 10, 10)) ; - - fDir = new TGListBox(fTabF1b, -1) ; - fDir->Resize(350,20) ; - char temp[100] ; - // sprintf ( temp, "%s", START_DIRECTORY ) ; - sprintf ( temp, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(temp, 1) ; - fTabF1b->AddFrame( fDir, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - - fPicCdup = fClient->GetPicture("tb_uplevel.xpm") ; - fCdup = new TGPictureButton(fTabF1b, fPicCdup, M_PBUTTON_CDIR_UP ) ; - fCdup->SetToolTipText("One Level up!") ; - fCdup->Associate(this) ; - fTabF1b->AddFrame (fCdup, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicList = fClient->GetPicture("tb_list.xpm") ; - fListMode = new TGPictureButton(fTabF1b, fPicList, M_PBUTTON_LIST_MODE ) ; - fListMode->SetToolTipText("List Mode") ; - fListMode->Associate(this) ; - fListMode->SetState(kButtonUp) ; - fListMode->AllowStayDown(kTRUE) ; - fListMode->AllowStayDown(kTRUE) ; fTabF1b->AddFrame (fListMode, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicDetail = fClient->GetPicture("tb_details.xpm") ; - fDetail = new TGPictureButton(fTabF1b, fPicDetail, M_PBUTTON_DETAIL_MODE ) ; - fDetail->SetToolTipText("Details Mode") ; - fDetail->Associate(this) ; - fDetail->SetState(kButtonEngaged) ; - fDetail->AllowStayDown(kTRUE) ; - fTabF1b->AddFrame (fDetail, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - // the items in the third subframe - - fFileView = new TGListView(fTabF1c, 540, 380 ) ; - fFileCont = new TGFileContainer(fFileView->GetViewPort(), 100, 100, - kVerticalFrame, fgWhitePixel) ; - - fFileCont->Associate(this) ; - fFileView->GetViewPort()->SetBackgroundColor(fgWhitePixel) ; - fFileView->SetContainer(fFileCont) ; - fFileCont->SetFilter("*") ; - // fFileCont->ChangeDirectory(START_DIRECTORY) ; - fFileCont->ChangeDirectory(gSystem->WorkingDirectory()) ; - fFileView->SetViewMode(kLVDetails); - fFileCont->Sort(kSortByName) ; - - fTabF1c->AddFrame(fFileView, new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ) ; - - tf->AddFrame(fTabF1, fLayTab) ; - - fFrameLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); - - AddFrame(fFrameLow, new TGLayoutHints (kLHintsExpandX|kLHintsExpandY) ) ; - - // - // Map the window, set up the layout, etc. - // - - SetWMSizeHints(200, 250, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame - - MapSubwindows(); - - Layout(); - - SetWindowName("EventDispMain"); - SetIconName("EventDispMain"); - - MapWindow(); - -} - - -// ====================================================================== -// ====================================================================== - -MGEventDispMain::~MGEventDispMain() -{ - //delete fPicCdup, fPicList, fPicDetail; - - delete fLayTab; - delete fLayMenuBar; - delete fLayMenuItem; - - delete fFileView; - delete fFileCont; - - delete fCdup; - delete fListMode; - delete fDetail; - delete fDir ; - delete fLabDir ; - - delete fButFileReset ; - delete fTxtFileName ; - delete fLabFileName ; - - delete fTabF1c; - delete fTabF1b; - delete fTabF1a; - delete fTabF1; - - delete fButFadcDispCal; - delete fButFadcDispPed; - delete fButFadcDispEvts; - delete fTop1; - delete fTab; - - delete fLineSep2 ; - delete fLineSep1 ; - - delete fFrameTop; - delete fFrameLow; - - delete fFileMenu; - delete fMenuBar; -} - - -// ====================================================================== -// ====================================================================== - -void MGEventDispMain::CloseWindow() -{ - // Got close message for this MainFrame. Calls parent CloseWindow() - // (which destroys the window) and terminate the application. - // The close message is generated by the window manager when its close - // window menu item is selected. - - delete this ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGEventDispMain::InputFileSelected() -{ - // Checks if there is a selected input root file - - if ( strcmp ( fInputFile, "\n") == 0 ) - { - return ( kFALSE ) ; - } - - return (kTRUE) ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGEventDispMain::ProcessMessage(Long_t msg, Long_t parm1, Long_t) -{ - // Process events generated by the buttons in the frame. - - Int_t buttons = 4, retval = 0 ; - Char_t wort[100] ; - Char_t extens[5] ; - Char_t command[110] ; - - TGFileItem *item ; // to process items in the file view container - void *np = NULL ; // null pointer - - switch (GET_MSG(msg)) - { - case kC_COMMAND: - switch (GET_SUBMSG(msg)) - { - case kCM_BUTTON: - - switch (parm1) - { - - case M_BUT_DISP1_EVT: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - new MGFadcDisp( fInputFile , "Events", - fClient->GetRoot(), this, 600, 500 ) ; - break ; - - case M_BUT_DISP1_PED: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - new MGFadcDisp( fInputFile , "PedEvts", - fClient->GetRoot(), this, 600, 500 ) ; - break ; - - case M_BUT_DISP1_CAL: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - new MGFadcDisp( fInputFile , "CalEvts", - fClient->GetRoot(), this, 600, 500 ) ; - break ; - - case M_FILERESET: - - sprintf ( fInputFile, "\n" ) ; - fTxtFileName->SetText( fInputFile ) ; - - break; - - case M_PBUTTON_CDIR_UP : - - // goto the parent directory - - gSystem->ChangeDirectory("..") ; - fDir->RemoveEntry(1) ; - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(wort,1) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - fFileCont->ChangeDirectory( wort ) ; - fFileCont->DisplayDirectory() ; - - break ; - - case M_PBUTTON_LIST_MODE: - fFileView->SetViewMode(kLVList) ; - fDetail->SetState(kButtonUp) ; - - break ; - - case M_PBUTTON_DETAIL_MODE: - fFileView->SetViewMode(kLVDetails) ; - fListMode->SetState(kButtonUp) ; - - break ; - - default: - break ; - } - - case kCM_MENU: - - switch (parm1) { - case M_FILE_CLOSE: - CloseWindow() ; - - break; - } - break ; - - default: - break ; - - } - - case kC_CONTAINER: - switch (GET_SUBMSG(msg)) { - - // case kCT_ITEMCLICK: - // printf ("itemclick\n"); - // break; - - - case kCT_ITEMDBLCLICK: - // - // process the double click in the file view container - // - - if ( parm1 == kButton1) { - if ( fFileCont->NumSelected() == 1 ) { - // - // one file selected - // - item = (TGFileItem *) fFileCont->GetNextSelected(&np) ; - - if ( S_ISDIR(item->GetType()) ) // file is directory - { - // goto directory - - sprintf (wort, "%s", item->GetItemName()->GetString()) ; - fFileCont->ChangeDirectory ( wort ) ; - gSystem->ChangeDirectory( wort ) ; - - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->RemoveEntry(1) ; - fDir->AddEntry( wort, 1 ) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - } - else // file is no directory, is a file - { - sprintf (wort, "%s", item->GetItemName()->GetString() ) ; - - // determine the file type by extensions - - for (Int_t i = 0 ; i<5; i++) - extens[i] = '\0' ; - - for ( Int_t i=0; wort[i] != '\0'; i++) { - if ( wort[i] == '.') { - strncpy (extens, &wort[i+1], 4 ) ; - break ; - } - } - - if ( ! strcmp(extens, "ps") ) { // postscript file - sprintf ( command, "gv %s/%s &", - gSystem->WorkingDirectory(), - wort ) ; - gSystem->Exec(command) ; - break ; - } - else if ( ! strcmp(extens, "root") ) { // root file - sprintf ( fInputFile, "%s/%s" , gSystem->WorkingDirectory(), wort ) ; - fTxtFileName->SetText( fInputFile ) ; - - break ; - } - - } - } - } - break; - - default: - break ; - } - - - - default: - break; - } - return kTRUE; -} Index: trunk/MagicSoft/Mars/mgui/MGEventDispMain.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MGEventDispMain.h (revision 710) +++ (revision ) @@ -1,105 +1,0 @@ -#ifndef MGEVENTDISPMAIN_H -#define MGEVENTDISPMAIN_H - -#ifndef MAGIC_H -#include "MAGIC.h" -#endif - -#ifndef ROOT_TGFrame -#include -#endif - - -class TGMenuBar; -class TGPopupMenu; -class TGTab; -class TGTextButton; -class TGListBox; -class TGPictureButton; -class TGFileContainer; -class TGListView; -class TGHorizontal3DLine; -class TGLabel ; -class TGTextEntry ; -class TGTextBuffer; - -class MGEventDispMain : public TGTransientFrame { - private: - - // - // Create a main frame with a number of different buttons. - // - - // some member not connected with Gui - - Char_t fInputFile[256] ; - - // the things for the menu bar - - TGMenuBar *fMenuBar ; - TGPopupMenu *fFileMenu ; - TGHorizontal3DLine *fLineSep1, *fLineSep2 ; - - - // divide the Window in two different parts - - TGCompositeFrame *fFrameTop ; // top part of the main window - TGCompositeFrame *fFrameLow ; // low part of the main window - TGTab *fTab ; // different tabs in the low window - - // the horizontal frame in the top part - - TGHorizontalFrame *fTop1 ; - - // the buttons in the Top Part - - TGTextButton *fButFadcDispEvts ; - TGTextButton *fButFadcDispPed ; - TGTextButton *fButFadcDispCal ; - - // the things in the file selector - - TGCompositeFrame *fTabF1 ; // first tab of low part - TGCompositeFrame *fTabF1a, *fTabF1b, *fTabF1c ; // subpart of the file selector in low window - - TGLabel *fLabFileName ; - TGTextEntry *fTxtFileName ; - TGTextBuffer *fTxtBufFileName ; //! - TGTextButton *fButFileReset ; - - TGLabel *fLabDir ; - TGListBox *fDir ; - TGPictureButton *fCdup, *fListMode, *fDetail ; - - TGFileContainer *fFileCont ; - TGListView *fFileView ; - - // Layout hints for different uses - - TGLayoutHints *fLayMenuBar, *fLayMenuItem ; - TGLayoutHints *fLayTab ; - - // some icons and pictures often used - - const TGPicture *fPicCdup; //! - const TGPicture *fPicList; //! - const TGPicture *fPicDetail; //! - - public: - MGEventDispMain(const TGWindow *p, const TGWindow *main, UInt_t w, UInt_t h) ; - - ~MGEventDispMain(); - - void CloseWindow() ; - - Bool_t InputFileSelected() ; - - Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); - - ClassDef(MGEventDispMain, 0) - -} ; - -#endif - - Index: trunk/MagicSoft/Mars/mgui/MGMarsMain.cc =================================================================== --- trunk/MagicSoft/Mars/mgui/MGMarsMain.cc (revision 710) +++ (revision ) @@ -1,257 +1,0 @@ -#include "MGMarsMain.h" - -#include // gROOT->GetApplication()->... - -#include // TGTab -#include // TGPopupMenu -#include // TGMsgBox -#include // TGPictureButton -#include // TGHorizontal3DLine - -#include "MGEventDispMain.h" -#include "MGDataCheckMain.h" -#include "MGMonteCarloMain.h" - -#include "MGPrototyp.h" - -ClassImp(MGMarsMain) - -enum CommandIdentifiers { - M_FILE_EXIT , - M_FILE_ABOUT , - - M_PICTURE_MAGIC , - M_PICTURE_MARS , - - M_BUTTON_EVTDISP , - M_BUTTON_DATACHECK , - M_BUTTON_ANALYSE , - M_BUTTON_MONTECARLO -} ; - - -MGMarsMain::MGMarsMain(/*const TGWindow *p,*/ UInt_t w, UInt_t h) - : TGMainFrame(gClient->GetRoot(), w, h) -{ - // First create the MenuBar. - - // Layout objects for menue. - - fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; - fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; - - // crate the menu bar - - fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; - fFileMenu->AddEntry ("Exit", M_FILE_EXIT ) ; - fFileMenu->Associate(this) ; - - // the button messages are handled by main frame (this) - - fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; - fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; - AddFrame(fMenuBar, fLayMenuBar ) ; - - fLineSep = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - // set up the top part of the main window with the logos - - fTop = new TGHorizontalFrame (this, 300, 100 ) ; - - fPicMagic = new TGPictureButton(fTop, - gClient->GetPicture("magiclogo.xpm"), M_PICTURE_MAGIC ); - fPicMagic->Associate(this) ; - fTop->AddFrame ( fPicMagic, new TGLayoutHints(kLHintsLeft, 10., 10., 20., 10.) ) ; - - fPicMars = new TGPictureButton(fTop, - gClient->GetPicture("marslogo.xpm"), M_PICTURE_MARS ); - fPicMars->Associate(this) ; - fTop->AddFrame ( fPicMars, new TGLayoutHints(kLHintsLeft, 10., 10., 10., 10.) ) ; - - AddFrame(fTop, new TGLayoutHints(kLHintsTop | kLHintsExpandX ) ); - - // a seperator - - fLineSep2 = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - // the low part of the frame - - fLow = new TGHorizontalFrame (this, 300, 100 ) ; - - // create the first tab - - fTab = new TGTab ( fLow, 400, 400 ) ; - - TGCompositeFrame *tf = fTab->AddTab("Control") ; - - fTabF1 = new TGVerticalFrame (tf, 300, 100) ; - - tf->AddFrame(fTabF1, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ) ; - - // the buttons to go in the new window - - fTabF2 = new TGVerticalFrame (tf, 300, 100) ; - - fButLayout = new TGLayoutHints(kLHintsTop | kLHintsCenterX , 10, 10, 10, 10) ; - - fButEvtDisp = new TGTextButton(fTabF2, "EventDisplay", M_BUTTON_EVTDISP ); - fButEvtDisp->Associate(this) ; - fTabF2->AddFrame(fButEvtDisp, fButLayout ) ; - - fButDataCheck = new TGTextButton(fTabF2, "Data Check", M_BUTTON_DATACHECK ); - fButDataCheck->Associate(this) ; - fTabF2->AddFrame(fButDataCheck, fButLayout ) ; - - fButAnalys = new TGTextButton(fTabF2, "Analysis", M_BUTTON_ANALYSE ); - fButAnalys->Associate(this) ; - fTabF2->AddFrame(fButAnalys, fButLayout ) ; - - fButMonteCarlo = new TGTextButton(fTabF2, "MonteCarlo", M_BUTTON_MONTECARLO ); - fButMonteCarlo->Associate(this) ; - fTabF2->AddFrame(fButMonteCarlo, fButLayout ) ; - - - - - tf->AddFrame(fTabF2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ) ; - - - - fLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); - AddFrame(fLow, new TGLayoutHints(kLHintsTop | kLHintsExpandX ) ); - - // Map the window, set up the layout, etc. - - SetWMSizeHints(400, 650, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame - - MapSubwindows(); - - Layout(); - - SetWindowName("MARS Main Window"); - SetIconName("MARS"); - - MapWindow(); - -} - -// ====================================================================== - -MGMarsMain::~MGMarsMain() -{ - - delete fButLayout; - delete fLayMenuBar; - delete fLayMenuItem; - delete fButEvtDisp; - delete fButDataCheck; - delete fButAnalys; - delete fButMonteCarlo; - delete fPicMagic; - delete fPicMars; - delete fTabF1; - delete fTabF2; - delete fTab; - delete fLow; - delete fTop; - delete fLineSep2; - delete fLineSep; - delete fFileMenu; - delete fMenuBar; -} -// ====================================================================== - -void MGMarsMain::CloseWindow() -{ - // Got close message for this MainFrame. Calls parent CloseWindow() - // (which destroys the window) and terminate the application. - // The close message is generated by the window manager when its close - // window menu item is selected. - - TGMainFrame::CloseWindow(); - gROOT->GetApplication()->Terminate(0) ; -} - -Bool_t MGMarsMain::ProcessMessage(Long_t msg, Long_t parm1, Long_t) -{ - // Process events generated by the buttons in the frame. - // printf (" process Message \n" ) ; - - Int_t buttons = 4, retval = 0 ; - - - switch (GET_MSG(msg)) - { - case kC_COMMAND: - switch (GET_SUBMSG(msg)) - { - case kCM_BUTTON: - - switch (parm1) - { - - case M_BUTTON_EVTDISP: - - new MGEventDispMain (fClient->GetRoot(), this, 400, 650 ) ; - break ; - - case M_BUTTON_DATACHECK: - new MGDataCheckMain(fClient->GetRoot(), this, 400, 650 ) ; - break ; - - case M_BUTTON_ANALYSE: - //new MGPrototyp(fClient->GetRoot(), this, 400, 650 ) ; - - new TGMsgBox(fClient->GetRoot(), this, - "WARNING!", - "Analysis not yet implemented!", - kMBIconExclamation, buttons, &retval); - break ; - - case M_BUTTON_MONTECARLO: - new MGMonteCarloMain(fClient->GetRoot(), this, 400, 650 ) ; - - break ; - - case M_PICTURE_MAGIC: - new TGMsgBox(fClient->GetRoot(), this, - "WARNING!", - "Please open a Netscape to the MAGIC homepage", - kMBIconExclamation, buttons, &retval); - break ; - - case M_PICTURE_MARS: - new TGMsgBox(fClient->GetRoot(), this, - "WARNING!", - "Please open a Netscape to the MARS homepage", - kMBIconExclamation, buttons, &retval); - break ; - - - default: - break ; - } - - - case kCM_MENU: - - switch (parm1) { - case M_FILE_EXIT: - CloseWindow() ; - break; - } - - - default: - break ; - } - - default: - break ; - } - - return kTRUE; - -} Index: trunk/MagicSoft/Mars/mgui/MGMarsMain.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MGMarsMain.h (revision 710) +++ (revision ) @@ -1,71 +1,0 @@ -#ifndef MGMARSMAIN_H -#define MGMARSMAIN_H - -#ifndef MAGIC_H -#include "MAGIC.h" -#endif - -#ifndef ROOT_TGFrame -#include -#endif - -class TGTab; -class TGMenuBar; -class TGPopupMenu; -class TGTextButton; -class TGPictureButton; -class TGHorizontal3DLine; - -class MGMarsMain : public TGMainFrame { - private: - - // - // Create a main frame with a number of different buttons. - // - - // the things for the menu bar - - TGMenuBar *fMenuBar ; - TGPopupMenu *fFileMenu ; - TGLayoutHints *fLayMenuBar; - TGLayoutHints *fLayMenuItem ; - TGHorizontal3DLine *fLineSep ; - - // divide the Window in two different parts - - TGHorizontalFrame *fTop ; // top part of the main window - TGHorizontal3DLine *fLineSep2 ; - TGHorizontalFrame *fLow ; // low part of the main window - TGTab *fTab ; // different tabs in the low window - - // the object in the top part of the frame - - TGPictureButton *fPicMagic; - TGPictureButton *fPicMars ; - - // the object in the low part of the frame - - TGVerticalFrame *fTabF1; - TGVerticalFrame *fTabF2 ; - - TGTextButton *fButEvtDisp; - TGTextButton *fButDataCheck; - TGTextButton *fButAnalys; - TGTextButton *fButMonteCarlo ; - TGLayoutHints *fButLayout ; - - public: - MGMarsMain(/*const TGWindow *p,*/ UInt_t w, UInt_t h) ; - - ~MGMarsMain(); - - void CloseWindow() ; - - Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); - - ClassDef(MGMarsMain, 0) -} ; - -#endif - - Index: trunk/MagicSoft/Mars/mgui/MGMonteCarloMain.cc =================================================================== --- trunk/MagicSoft/Mars/mgui/MGMonteCarloMain.cc (revision 710) +++ (revision ) @@ -1,392 +1,0 @@ -#include "MGMonteCarloMain.h" - -#include // gSystem - -#include // TGTab -#include // TGPopupMenu -#include // TGTextButton -#include // TGMsgBox -#include // TGListBox -#include // TGFileContainer - -// FIXME: Move to MAGIC.h -#define S_ISDIR(m) (((m)&(0170000)) == (0040000)) - -ClassImp(MGMonteCarloMain) - -enum CommandDataChecker { - M_FILE_CLOSE , - M_BUTTON_ACTION, - - M_PBUTTON_CDIR_UP, - M_PBUTTON_LIST_MODE, - M_PBUTTON_DETAIL_MODE -} ; - - -MGMonteCarloMain::MGMonteCarloMain(const TGWindow *p, const TGWindow *main, - UInt_t w, UInt_t h ) - : TGTransientFrame(p, main, w, h ) -{ - // - // Main window to controll the october test - // - - // set non-gui members to starting values - - sprintf ( fInputFile, "\n" ) ; - - // - // First create the MenuBar. - // - - // Layout objects for menue. - - fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; - fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; - - // crate the menu bar - - fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; - fFileMenu->AddEntry ("Close", M_FILE_CLOSE ) ; - fFileMenu->Associate(this) ; - - // the button messages are handled by main frame (this) - - fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; - fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; - AddFrame(fMenuBar, fLayMenuBar ) ; - - // - // Create the top window with a lot of buttons - // - - fFrameTop = new TGCompositeFrame (this, 300,100, kVerticalFrame ) ; - - fTop1 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fButAction = new TGTextButton(fTop1, "ACTION", M_BUTTON_ACTION ); - fButAction->Associate(this) ; - fTop1->AddFrame (fButAction, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fFrameTop->AddFrame (fTop1, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - AddFrame(fFrameTop, new TGLayoutHints (kLHintsTop ) ) ; - - - // - // Create the low window with a tabs in it - // - - fFrameLow = new TGCompositeFrame (this, 300,100, kHorizontalFrame ) ; - - fLayTab = new TGLayoutHints ( kLHintsExpandX , 5, 5, 5, 5 ) ; - - // create the first tab - - fTab = new TGTab ( fFrameLow, 400, 400 ) ; - - TGCompositeFrame *tf = fTab->AddTab("Input File") ; - - fTabF1 = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - // tf->AddFrame(fTabF1, fLayTab ) ; - - - fTabF1a = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1a, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1b = new TGCompositeFrame (tf, 100, 100, kVerticalFrame) ; - // tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - - - fDir = new TGListBox(fTabF1a, -1) ; - fDir->Resize(350,20) ; - char temp[100] ; - // sprintf ( temp, "%s", START_DIRECTORY ) ; - sprintf ( temp, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(temp, 1) ; - fTabF1a->AddFrame( fDir, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - - fPicCdup = fClient->GetPicture("tb_uplevel.xpm") ; - fCdup = new TGPictureButton(fTabF1a, fPicCdup, M_PBUTTON_CDIR_UP ) ; - fCdup->SetToolTipText("One Level up!") ; - fCdup->Associate(this) ; - fTabF1a->AddFrame (fCdup, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicList = fClient->GetPicture("tb_list.xpm") ; - fListMode = new TGPictureButton(fTabF1a, fPicList, M_PBUTTON_LIST_MODE ) ; - fListMode->SetToolTipText("List Mode") ; - fListMode->Associate(this) ; - fListMode->SetState(kButtonUp) ; - fListMode->AllowStayDown(kTRUE) ; - fListMode->AllowStayDown(kTRUE) ; fTabF1a->AddFrame (fListMode, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicDetail = fClient->GetPicture("tb_details.xpm") ; - fDetail = new TGPictureButton(fTabF1a, fPicDetail, M_PBUTTON_DETAIL_MODE ) ; - fDetail->SetToolTipText("Details Mode") ; - fDetail->Associate(this) ; - fDetail->SetState(kButtonEngaged) ; - fDetail->AllowStayDown(kTRUE) ; - fTabF1a->AddFrame (fDetail, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - - fFileView = new TGListView(fTabF1b, 540, 380 ) ; - fFileCont = new TGFileContainer(fFileView->GetViewPort(), 100, 100, - kVerticalFrame, fgWhitePixel) ; - - fFileCont->Associate(this) ; - fFileView->GetViewPort()->SetBackgroundColor(fgWhitePixel) ; - fFileView->SetContainer(fFileCont) ; - fFileCont->SetFilter("*") ; - // fFileCont->ChangeDirectory(START_DIRECTORY) ; - fFileCont->ChangeDirectory(gSystem->WorkingDirectory()) ; - fFileView->SetViewMode(kLVDetails); - fFileCont->Sort(kSortByName) ; - - fTabF1b->AddFrame(fFileView, new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ) ; - - tf->AddFrame(fTabF1, fLayTab) ; - - fFrameLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); - - AddFrame(fFrameLow, new TGLayoutHints (kLHintsExpandX|kLHintsExpandY) ) ; - - // - // Map the window, set up the layout, etc. - // - - SetWMSizeHints(200, 250, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame - - MapSubwindows(); - - Layout(); - - SetWindowName("MonteCarlo Main"); - SetIconName("MonteCarlo"); - - MapWindow(); - -} - - -// ====================================================================== -// ====================================================================== - -MGMonteCarloMain::~MGMonteCarloMain() -{ - //delete fPicCdup, fPicList, fPicDetail; - delete fLayTab; - delete fLayMenuBar; - delete fLayMenuItem; - delete fFileView; - delete fFileCont; - delete fCdup; - delete fListMode; - delete fDetail; - delete fDir ; - delete fTabF1b; - delete fTabF1a; - delete fTabF1; - delete fButAction; - delete fTop1; - delete fTab; - delete fFrameTop; - delete fFrameLow; - delete fFileMenu; - delete fMenuBar; - -} - - -// ====================================================================== -// ====================================================================== - -void MGMonteCarloMain::CloseWindow() -{ - // Got close message for this MainFrame. Calls parent CloseWindow() - // (which destroys the window) and terminate the application. - // The close message is generated by the window manager when its close - // window menu item is selected. - - delete this ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGMonteCarloMain::InputFileSelected() -{ - // Checks if there is a selected input root file - - return strcmp ( fInputFile, "\n") == 0 ? kFALSE : kTRUE; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGMonteCarloMain::ProcessMessage(Long_t msg, Long_t parm1, Long_t) -{ - // Process events generated by the buttons in the frame. - - Int_t buttons = 4, retval = 0 ; - Char_t wort[100] ; - Char_t extens[5] ; - Char_t command[110] ; - - TGFileItem *item ; // to process items in the file view container - void *np = NULL ; // null pointer - - switch (GET_MSG(msg)) - { - case kC_COMMAND: - switch (GET_SUBMSG(msg)) - { - case kCM_BUTTON: - - switch (parm1) - { - - case M_BUTTON_ACTION: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - new TGMsgBox(fClient->GetRoot(), this, "INFORMATION!", - "Put Intelligence here!!!", kMBIconExclamation, buttons, &retval); - - break ; - - case M_PBUTTON_CDIR_UP : - - // goto the parent directory - - gSystem->ChangeDirectory("..") ; - fDir->RemoveEntry(1) ; - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(wort,1) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - fFileCont->ChangeDirectory( wort ) ; - fFileCont->DisplayDirectory() ; - - break ; - - case M_PBUTTON_LIST_MODE: - fFileView->SetViewMode(kLVList) ; - fDetail->SetState(kButtonUp) ; - - break ; - - case M_PBUTTON_DETAIL_MODE: - fFileView->SetViewMode(kLVDetails) ; - fListMode->SetState(kButtonUp) ; - - break ; - - default: - break ; - } - - case kCM_MENU: - - switch (parm1) { - case M_FILE_CLOSE: - CloseWindow() ; - - break; - } - break ; - - default: - break ; - - } - - case kC_CONTAINER: - switch (GET_SUBMSG(msg)) { - - // case kCT_ITEMCLICK: - // printf ("itemclick\n"); - // break; - - - case kCT_ITEMDBLCLICK: - // - // process the double click in the file view container - // - - if ( parm1 == kButton1) { - if ( fFileCont->NumSelected() == 1 ) { - // - // one file selected - // - item = (TGFileItem *) fFileCont->GetNextSelected(&np) ; - - if ( S_ISDIR(item->GetType()) ) // file is directory - { - // goto directory - - sprintf (wort, "%s", item->GetItemName()->GetString()) ; - fFileCont->ChangeDirectory ( wort ) ; - gSystem->ChangeDirectory( wort ) ; - - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->RemoveEntry(1) ; - fDir->AddEntry( wort, 1 ) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - } - else // file is no directory, is a file - { - sprintf (wort, "%s", item->GetItemName()->GetString() ) ; - - // determine the file type by extensions - - for (Int_t i = 0 ; i<5; i++) - extens[i] = '\0' ; - - for ( Int_t i=0; wort[i] != '\0'; i++) { - if ( wort[i] == '.') { - strncpy (extens, &wort[i+1], 4 ) ; - break ; - } - } - - if ( ! strcmp(extens, "ps") ) { // postscript file - sprintf ( command, "gv %s/%s &", - gSystem->WorkingDirectory(), - wort ) ; - gSystem->Exec(command) ; - break ; - } - else if ( ! strcmp(extens, "root") ) { // root file - sprintf ( fInputFile, "%s/%s" , gSystem->WorkingDirectory(), wort ) ; - - printf (" %s \n", fInputFile ) ; - break ; - } - - } - } - } - break; - - default: - break ; - } - - - - default: - break; - } - return kTRUE; -} Index: trunk/MagicSoft/Mars/mgui/MGMonteCarloMain.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MGMonteCarloMain.h (revision 710) +++ (revision ) @@ -1,89 +1,0 @@ -#ifndef MGMONTECARLOMAIH_H -#define MGMONTECARLOMAIN_H - -#ifndef MAGIC_H -#include "MAGIC.h" -#endif - -#ifndef ROOT_TGFrame -#include -#endif - - -class TGMenuBar; -class TGPopupMenu; -class TGTab; -class TGTextButton; -class TGListBox; -class TGPictureButton; -class TGFileContainer; -class TGListView; - -class MGMonteCarloMain : public TGTransientFrame { - private: - - // - // Create a main frame with a number of different buttons. - // - - // some member not connected with Gui - - Char_t fInputFile[256] ; - - // the things for the menu bar - - TGMenuBar *fMenuBar ; - TGPopupMenu *fFileMenu ; - - // divide the Window in two different parts - - TGCompositeFrame *fFrameTop ; // top part of the main window - TGCompositeFrame *fFrameLow ; // low part of the main window - TGTab *fTab ; // different tabs in the low window - - // the horizontal frame in the top part - - TGHorizontalFrame *fTop1 ; - - // the buttons in the Top Part - - TGTextButton *fButAction ; - - // the things in the file selector - - TGCompositeFrame *fTabF1 ; // first tab of low part - TGCompositeFrame *fTabF1a, *fTabF1b ; // subpart of the file selector in low window - TGListBox *fDir ; - TGPictureButton *fCdup, *fListMode, *fDetail ; - TGFileContainer *fFileCont ; - TGListView *fFileView ; - - // Layout hints for different uses - - TGLayoutHints *fLayMenuBar, *fLayMenuItem ; - TGLayoutHints *fLayTab ; - - // some icons and pictures often used - - const TGPicture *fPicCdup; //! - const TGPicture *fPicList; //! - const TGPicture *fPicDetail; //! - - public: - MGMonteCarloMain(const TGWindow *p, const TGWindow *main, UInt_t w, UInt_t h) ; - - ~MGMonteCarloMain(); - - void CloseWindow() ; - - Bool_t InputFileSelected() ; - - Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); - - ClassDef(MGMonteCarloMain, 0) - -} ; - -#endif - - Index: trunk/MagicSoft/Mars/mgui/MGPrototyp.cc =================================================================== --- trunk/MagicSoft/Mars/mgui/MGPrototyp.cc (revision 710) +++ (revision ) @@ -1,450 +1,0 @@ -#include "MGPrototyp.h" - -#include // gSystem - -#include // TGTab -#include // TGPopupMenu -#include // TGTextButton -#include // TGMsgBox -#include // TGListBox -#include // TGFileContainer -#include // TGHorizontal3DLine -#include -#include // TGLabel - - -// FIXME: Move to MAGIC.h -#define S_ISDIR(m) (((m)&(0170000)) == (0040000)) - -ClassImp(MGPrototyp) - -enum CommandPrototyp { - M_FILE_CLOSE , - M_BUTTON_ACTION, - - M_FILERESET, - M_PBUTTON_CDIR_UP, - M_PBUTTON_LIST_MODE, - M_PBUTTON_DETAIL_MODE -} ; - - -MGPrototyp::MGPrototyp(const TGWindow *p, const TGWindow *main, - UInt_t w, UInt_t h ) - : TGTransientFrame(p, main, w, h ) -{ - // - // Main window to controll the october test - // - - // set non-gui members to starting values - - sprintf ( fInputFile, "\n" ) ; - - // - // First create the MenuBar. - // - - // Layout objects for menue. - - fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; - fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; - - // crate the menu bar - - fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; - fFileMenu->AddEntry ("Close", M_FILE_CLOSE ) ; - fFileMenu->Associate(this) ; - - // the button messages are handled by main frame (this) - - fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; - fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; - AddFrame(fMenuBar, fLayMenuBar ) ; - - fLineSep1 = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep1, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - - // - // Create the top window with a lot of buttons - // - - fFrameTop = new TGCompositeFrame (this, 300,100, kVerticalFrame ) ; - - fTop1 = new TGHorizontalFrame (fFrameTop, 300, 100 ) ; - - fButAction = new TGTextButton(fTop1, "ACTION", M_BUTTON_ACTION ); - fButAction->Associate(this) ; - fTop1->AddFrame (fButAction, new TGLayoutHints(kLHintsTop | kLHintsLeft, 10, 10, 5, 5) ); - - fFrameTop->AddFrame (fTop1, new TGLayoutHints(kLHintsCenterX, 10, 10, 5, 5) ); - - AddFrame(fFrameTop, new TGLayoutHints (kLHintsTop ) ) ; - - // a line between top and low frame - - fLineSep2 = new TGHorizontal3DLine(this) ; - AddFrame(fLineSep2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); - - // - // Create the low window with a tabs in it - // - - fFrameLow = new TGCompositeFrame (this, 300,100, kHorizontalFrame ) ; - - fLayTab = new TGLayoutHints ( kLHintsExpandX , 5, 5, 5, 5 ) ; - - // create the first tab - - fTab = new TGTab ( fFrameLow, 400, 400 ) ; - - TGCompositeFrame *tf = fTab->AddTab("Input File") ; - - fTabF1 = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - // tf->AddFrame(fTabF1, fLayTab ) ; - - fTabF1a = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1a, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1b = new TGCompositeFrame (tf, 100, 100, kHorizontalFrame) ; - tf->AddFrame(fTabF1b, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - fTabF1c = new TGCompositeFrame (tf, 100, 100, kVerticalFrame) ; - // tf->AddFrame(fTabF1c, new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - tf->AddFrame(fTabF1c, new TGLayoutHints ( kLHintsExpandX | kLHintsExpandY , 5, 5, 5, 5 ) ) ; - - // the items in the first subframe - - fLabFileName = new TGLabel(fTabF1a, new TGString("selected File:") ); - fTabF1a->AddFrame( fLabFileName, new TGLayoutHints (kLHintsLeft, 10, 10, 10, 10)) ; - - fTxtFileName = new TGTextEntry(fTabF1a, fTxtBufFileName = new TGTextBuffer(256) ); - fTxtFileName->Resize(60, fTxtFileName->GetDefaultHeight()); - fTabF1a->AddFrame(fTxtFileName, new TGLayoutHints(kLHintsTop | kLHintsExpandX, 5, 5, 5, 5)); - - fButFileReset = new TGTextButton (fTabF1a, "Reset", M_FILERESET ) ; - fButFileReset->Associate(this) ; - fTabF1a->AddFrame (fButFileReset, new TGLayoutHints (kLHintsRight, 10, 10, 10, 10 ) ) ; - - - - // the items in the second subfraem - - fLabDir = new TGLabel(fTabF1b, new TGString("Directory:") ); - fTabF1b->AddFrame( fLabDir, new TGLayoutHints (kLHintsLeft, 10, 10, 10, 10)) ; - - fDir = new TGListBox(fTabF1b, -1) ; - fDir->Resize(350,20) ; - char temp[100] ; - // sprintf ( temp, "%s", START_DIRECTORY ) ; - sprintf ( temp, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(temp, 1) ; - fTabF1b->AddFrame( fDir, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsExpandX, 5, 5, 5, 5 ) ) ; - - - fPicCdup = fClient->GetPicture("tb_uplevel.xpm") ; - fCdup = new TGPictureButton(fTabF1b, fPicCdup, M_PBUTTON_CDIR_UP ) ; - fCdup->SetToolTipText("One Level up!") ; - fCdup->Associate(this) ; - fTabF1b->AddFrame (fCdup, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicList = fClient->GetPicture("tb_list.xpm") ; - fListMode = new TGPictureButton(fTabF1b, fPicList, M_PBUTTON_LIST_MODE ) ; - fListMode->SetToolTipText("List Mode") ; - fListMode->Associate(this) ; - fListMode->SetState(kButtonUp) ; - fListMode->AllowStayDown(kTRUE) ; - fListMode->AllowStayDown(kTRUE) ; fTabF1b->AddFrame (fListMode, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - fPicDetail = fClient->GetPicture("tb_details.xpm") ; - fDetail = new TGPictureButton(fTabF1b, fPicDetail, M_PBUTTON_DETAIL_MODE ) ; - fDetail->SetToolTipText("Details Mode") ; - fDetail->Associate(this) ; - fDetail->SetState(kButtonEngaged) ; - fDetail->AllowStayDown(kTRUE) ; - fTabF1b->AddFrame (fDetail, new TGLayoutHints(kLHintsLeft | kLHintsTop, 5, 5, 5, 5) ) ; - - // the items in the third subframe - - fFileView = new TGListView(fTabF1c, 540, 380 ) ; - fFileCont = new TGFileContainer(fFileView->GetViewPort(), 100, 100, - kVerticalFrame, fgWhitePixel) ; - - fFileCont->Associate(this) ; - fFileView->GetViewPort()->SetBackgroundColor(fgWhitePixel) ; - fFileView->SetContainer(fFileCont) ; - fFileCont->SetFilter("*") ; - // fFileCont->ChangeDirectory(START_DIRECTORY) ; - fFileCont->ChangeDirectory(gSystem->WorkingDirectory()) ; - fFileView->SetViewMode(kLVDetails); - fFileCont->Sort(kSortByName) ; - - fTabF1c->AddFrame(fFileView, new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ) ; - - tf->AddFrame(fTabF1, fLayTab) ; - - fFrameLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); - - AddFrame(fFrameLow, new TGLayoutHints (kLHintsExpandX|kLHintsExpandY) ) ; - - // - // Map the window, set up the layout, etc. - // - - SetWMSizeHints(200, 250, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame - - MapSubwindows(); - - Layout(); - - SetWindowName("Prototyp"); - SetIconName("Prototyp"); - - MapWindow(); - -} - - -// ====================================================================== -// ====================================================================== - -MGPrototyp::~MGPrototyp() -{ - //delete fPicCdup, fPicList, fPicDetail; - delete fLayTab; - delete fLayMenuBar; - delete fLayMenuItem; - delete fFileView; - delete fFileCont; - delete fCdup; - delete fListMode; - delete fDetail; - delete fDir ; - delete fLabDir ; - - delete fButFileReset ; - delete fTxtFileName ; - delete fLabFileName ; - - delete fTabF1c; - delete fTabF1b; - delete fTabF1a; - delete fTabF1; - delete fButAction; - delete fTop1; - delete fTab; - - delete fFrameTop; - delete fFrameLow; - delete fLineSep2 ; - delete fLineSep1 ; - - delete fFileMenu; - delete fMenuBar; - -} - - -// ====================================================================== -// ====================================================================== - -void MGPrototyp::CloseWindow() -{ - // Got close message for this MainFrame. Calls parent CloseWindow() - // (which destroys the window) and terminate the application. - // The close message is generated by the window manager when its close - // window menu item is selected. - - delete this ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGPrototyp::InputFileSelected() -{ - // Checks if there is a selected input root file - - if ( strcmp ( fInputFile, "\n") == 0 ) - { - return ( kFALSE ) ; - } - - return (kTRUE) ; -} - - -// ====================================================================== -// ====================================================================== - -Bool_t MGPrototyp::ProcessMessage(Long_t msg, Long_t parm1, Long_t) -{ - // Process events generated by the buttons in the frame. - - Int_t buttons = 4, retval = 0 ; - Char_t wort[100] ; - Char_t extens[5] ; - Char_t command[110] ; - - TGFileItem *item ; // to process items in the file view container - void *np = NULL ; // null pointer - - switch (GET_MSG(msg)) - { - case kC_COMMAND: - switch (GET_SUBMSG(msg)) - { - case kCM_BUTTON: - - switch (parm1) - { - - case M_BUTTON_ACTION: - - if ( InputFileSelected() == kFALSE ) { // it is not selected - - new TGMsgBox(fClient->GetRoot(), this, "ERROR!", - "No Input (root) File selected!", kMBIconExclamation, buttons, &retval); - break ; - } - - new TGMsgBox(fClient->GetRoot(), this, "INFORMATION!", - "Put Intelligence here!!!", kMBIconExclamation, buttons, &retval); - - break ; - - - case M_FILERESET: - - sprintf ( fInputFile, "\n" ) ; - fTxtFileName->SetText( fInputFile ) ; - - break; - case M_PBUTTON_CDIR_UP : - - // goto the parent directory - - gSystem->ChangeDirectory("..") ; - fDir->RemoveEntry(1) ; - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->AddEntry(wort,1) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - fFileCont->ChangeDirectory( wort ) ; - fFileCont->DisplayDirectory() ; - - break ; - - case M_PBUTTON_LIST_MODE: - fFileView->SetViewMode(kLVList) ; - fDetail->SetState(kButtonUp) ; - - break ; - - case M_PBUTTON_DETAIL_MODE: - fFileView->SetViewMode(kLVDetails) ; - fListMode->SetState(kButtonUp) ; - - break ; - - default: - break ; - } - - case kCM_MENU: - - switch (parm1) { - case M_FILE_CLOSE: - CloseWindow() ; - - break; - } - break ; - - default: - break ; - - } - - case kC_CONTAINER: - switch (GET_SUBMSG(msg)) { - - // case kCT_ITEMCLICK: - // printf ("itemclick\n"); - // break; - - - case kCT_ITEMDBLCLICK: - // - // process the double click in the file view container - // - - if ( parm1 == kButton1) { - if ( fFileCont->NumSelected() == 1 ) { - // - // one file selected - // - item = (TGFileItem *) fFileCont->GetNextSelected(&np) ; - - if ( S_ISDIR(item->GetType()) ) // file is directory - { - // goto directory - - sprintf (wort, "%s", item->GetItemName()->GetString()) ; - fFileCont->ChangeDirectory ( wort ) ; - gSystem->ChangeDirectory( wort ) ; - - sprintf (wort, "%s", gSystem->WorkingDirectory() ) ; - fDir->RemoveEntry(1) ; - fDir->AddEntry( wort, 1 ) ; - fDir->MapSubwindows() ; - fDir->Layout() ; - } - else // file is no directory, is a file - { - sprintf (wort, "%s", item->GetItemName()->GetString() ) ; - - // determine the file type by extensions - - for (Int_t i = 0 ; i<5; i++) - extens[i] = '\0' ; - - for ( Int_t i=0; wort[i] != '\0'; i++) { - if ( wort[i] == '.') { - strncpy (extens, &wort[i+1], 4 ) ; - break ; - } - } - - if ( ! strcmp(extens, "ps") ) { // postscript file - sprintf ( command, "gv %s/%s &", - gSystem->WorkingDirectory(), - wort ) ; - gSystem->Exec(command) ; - break ; - } - else if ( ! strcmp(extens, "root") ) { // root file - sprintf ( fInputFile, "%s/%s" , gSystem->WorkingDirectory(), wort ) ; - fTxtFileName->SetText( fInputFile ) ; - - break ; - } - - } - } - } - break; - - default: - break ; - } - - - - default: - break; - } - return kTRUE; -} Index: trunk/MagicSoft/Mars/mgui/MGPrototyp.h =================================================================== --- trunk/MagicSoft/Mars/mgui/MGPrototyp.h (revision 710) +++ (revision ) @@ -1,101 +1,0 @@ -#ifndef MGPROTOTYP_H -#define MGPROTOTYP_H - -#ifndef MAGIC_H -#include "MAGIC.h" -#endif - -#ifndef ROOT_TGFrame -#include -#endif - -class TGMenuBar; -class TGPopupMenu; -class TGTab; -class TGTextButton; -class TGListBox; -class TGPictureButton; -class TGFileContainer; -class TGListView; -class TGHorizontal3DLine; -class TGLabel ; -class TGTextEntry ; -class TGTextBuffer; - -class MGPrototyp : public TGTransientFrame { - private: - - // - // Create a main frame with a number of different buttons. - // - - // some member not connected with Gui - - Char_t fInputFile[256] ; - - // the things for the menu bar - - TGMenuBar *fMenuBar ; - TGPopupMenu *fFileMenu ; - TGHorizontal3DLine *fLineSep1, *fLineSep2 ; - - - // divide the Window in two different parts - - TGCompositeFrame *fFrameTop ; // top part of the main window - TGCompositeFrame *fFrameLow ; // low part of the main window - TGTab *fTab ; // different tabs in the low window - - // the horizontal frame in the top part - - TGHorizontalFrame *fTop1 ; - - // the buttons in the Top Part - - TGTextButton *fButAction ; - - // the things in the file selector - - TGCompositeFrame *fTabF1 ; // first tab of low part - TGCompositeFrame *fTabF1a, *fTabF1b, *fTabF1c ; // subpart of the file selector in low window - - TGLabel *fLabFileName ; - TGTextEntry *fTxtFileName ; - TGTextBuffer *fTxtBufFileName ; //! - TGTextButton *fButFileReset ; - - TGLabel *fLabDir ; - TGListBox *fDir ; - TGPictureButton *fCdup, *fListMode, *fDetail ; - TGFileContainer *fFileCont ; - TGListView *fFileView ; - - // Layout hints for different uses - - TGLayoutHints *fLayMenuBar, *fLayMenuItem ; - TGLayoutHints *fLayTab ; - - // some icons and pictures often used - - const TGPicture *fPicCdup; //! - const TGPicture *fPicList; //! - const TGPicture *fPicDetail; //! - - public: - MGPrototyp(const TGWindow *p, const TGWindow *main, UInt_t w, UInt_t h) ; - - ~MGPrototyp(); - - void CloseWindow() ; - - Bool_t InputFileSelected() ; - - Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); - - ClassDef(MGPrototyp, 0) - -} ; - -#endif - - Index: trunk/MagicSoft/Mars/mgui/Makefile =================================================================== --- trunk/MagicSoft/Mars/mgui/Makefile (revision 710) +++ trunk/MagicSoft/Mars/mgui/Makefile (revision 714) @@ -30,9 +30,4 @@ SRCFILES = MCamDisplay.cc \ MCamNeighbor.cc \ - MGDataCheckMain.cc \ - MGEventDispMain.cc \ - MGMarsMain.cc \ - MGMonteCarloMain.cc \ - MGPrototyp.cc \ MGeomCamCT1.cc \ MGeomCamMagic.cc \