- Timestamp:
- 09/25/01 16:14:39 (23 years ago)
- Location:
- trunk/MagicSoft/Mars
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/MagicSoft/Mars/Changelog
r945 r946 10 10 11 11 * mmain/MBrowser.[cc,h]: 12 - reorganized code (constructor) 13 - reorganized deletion of gui objects 14 - fixed many, many memory leaks 15 16 * mmain/MMars.[cc,h]: 12 17 - reorganized code (constructor) 13 18 - reorganized deletion of gui objects -
trunk/MagicSoft/Mars/mmain/MMars.cc
r928 r946 44 44 45 45 enum { 46 M_FILE_EXIT 47 M_FILE_ABOUT 48 49 M_PICTURE_MAGIC ,50 M_PICTURE_MARS 51 52 M_BUTTON_EVTDISP 53 M_BUTTON_DATACHECK 54 M_BUTTON_ANALYSE 55 M_BUTTON_MONTECARLO 46 M_FILE_EXIT, 47 M_FILE_ABOUT, 48 49 M_PICTURE_MAGIC, 50 M_PICTURE_MARS, 51 52 M_BUTTON_EVTDISP, 53 M_BUTTON_DATACHECK, 54 M_BUTTON_ANALYSE, 55 M_BUTTON_MONTECARLO 56 56 } ; 57 57 58 void MMars::CreateMenuBar() 59 { 60 TGLayoutHints *laymenubar = new TGLayoutHints(kLHintsTop|kLHintsLeft|kLHintsExpandX, 2, 2, 2, 2); 61 TGLayoutHints *laymenuitem = new TGLayoutHints(kLHintsTop|kLHintsLeft, 0, 4, 0, 0); 62 TGLayoutHints *laylinesep = new TGLayoutHints(kLHintsTop|kLHintsExpandX); 63 64 fList->Add(laymenubar); 65 fList->Add(laymenuitem); 66 fList->Add(laylinesep); 67 68 TGPopupMenu *filemenu = new TGPopupMenu(gClient->GetRoot()); 69 filemenu->AddEntry("Exit", M_FILE_EXIT); 70 //fFileMenu->Associate(this); 71 72 TGMenuBar *menubar = new TGMenuBar(this, 1, 1, kHorizontalFrame); 73 menubar->AddPopup("File", filemenu, laymenuitem); 74 AddFrame(menubar, laymenubar); 75 76 TGHorizontal3DLine *linesep = new TGHorizontal3DLine(this); 77 AddFrame(linesep, laylinesep); 78 79 fList->Add(filemenu); 80 fList->Add(menubar); 81 fList->Add(linesep); 82 } 83 84 void MMars::CreateTopFrame(TGHorizontalFrame *top) 85 { 86 fPic1 = gClient->GetPicture("magiclogo.xpm"); 87 fPic2 = gClient->GetPicture("marslogo.xpm"); 88 89 TGPictureButton *magic = new TGPictureButton(top, fPic1, M_PICTURE_MAGIC); 90 TGPictureButton *mars = new TGPictureButton(top, fPic2, M_PICTURE_MARS); 91 92 fList->Add(magic); 93 fList->Add(mars); 94 95 magic->Associate(this); 96 mars->Associate(this); 97 98 TGLayoutHints *lay1 = new TGLayoutHints(kLHintsLeft, 10., 10., 20., 10.); 99 TGLayoutHints *lay2 = new TGLayoutHints(kLHintsLeft, 10., 10., 10., 10.); 100 101 fList->Add(lay1); 102 fList->Add(lay2); 103 104 top->AddFrame(magic, lay1); 105 top->AddFrame(mars, lay1); 106 } 107 108 void MMars::CreateBottomFrame(TGHorizontalFrame *low) 109 { 110 // 111 // Create Tab Container 112 // 113 TGLayoutHints *laytabs = new TGLayoutHints(kLHintsBottom|kLHintsExpandX|kLHintsExpandY, 5, 5, 5, 5); 114 fList->Add(laytabs); 115 116 TGTab *tabs = new TGTab(low, 400, 400); 117 fList->Add(tabs); 118 low->AddFrame(tabs, laytabs); 119 120 // 121 // Create Tab1 122 // 123 TGCompositeFrame *tf = tabs->AddTab("Control"); 124 125 TGVerticalFrame *tab1 = new TGVerticalFrame(tf, 300, 100); 126 TGVerticalFrame *tab2 = new TGVerticalFrame(tf, 300, 100); 127 128 fList->Add(tab1); 129 fList->Add(tab2); 130 131 TGLayoutHints *laytabx = new TGLayoutHints(kLHintsTop|kLHintsExpandX); 132 fList->Add(laytabx); 133 134 tf->AddFrame(tab1, laytabx); 135 tf->AddFrame(tab2, laytabx); 136 137 TGTextButton *evtdisp = new TGTextButton(tab2, "EventDisplay", M_BUTTON_EVTDISP); 138 TGTextButton *datacheck = new TGTextButton(tab2, "Data Check", M_BUTTON_DATACHECK); 139 TGTextButton *analysis = new TGTextButton(tab2, "Analysis", M_BUTTON_ANALYSE); 140 TGTextButton *montecarlo = new TGTextButton(tab2, "MonteCarlo", M_BUTTON_MONTECARLO); 141 142 fList->Add(evtdisp); 143 fList->Add(datacheck); 144 fList->Add(analysis); 145 fList->Add(montecarlo); 146 147 evtdisp ->Associate(this); 148 datacheck ->Associate(this); 149 analysis ->Associate(this); 150 montecarlo->Associate(this); 151 152 TGLayoutHints *laybut = new TGLayoutHints(kLHintsTop|kLHintsCenterX , 10, 10, 10, 10); 153 fList->Add(laybut); 154 155 tab2->AddFrame(evtdisp, laybut); 156 tab2->AddFrame(datacheck, laybut); 157 tab2->AddFrame(analysis, laybut); 158 tab2->AddFrame(montecarlo, laybut); 159 } 58 160 59 161 MMars::MMars(/*const TGWindow *p,*/ UInt_t w, UInt_t h) 60 162 : TGMainFrame(gClient->GetRoot(), w, h) 61 { 62 // First create the MenuBar. 63 64 // Layout objects for menue. 65 66 fLayMenuBar = new TGLayoutHints ( kLHintsTop | kLHintsLeft | kLHintsExpandX, 2, 2, 2, 2 ) ; 67 fLayMenuItem = new TGLayoutHints ( kLHintsTop | kLHintsLeft , 0, 4, 0, 0 ) ; 68 69 // crate the menu bar 70 71 fFileMenu = new TGPopupMenu ( fClient->GetRoot() ) ; 72 fFileMenu->AddEntry ("Exit", M_FILE_EXIT ) ; 73 fFileMenu->Associate(this) ; 74 75 // the button messages are handled by main frame (this) 76 77 fMenuBar = new TGMenuBar ( this, 1, 1, kHorizontalFrame ) ; 78 fMenuBar->AddPopup("File", fFileMenu, fLayMenuItem ) ; 79 AddFrame(fMenuBar, fLayMenuBar ) ; 80 81 fLineSep = new TGHorizontal3DLine(this) ; 82 AddFrame(fLineSep, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); 83 84 // set up the top part of the main window with the logos 85 86 fTop = new TGHorizontalFrame (this, 300, 100 ) ; 87 88 fPicMagic = new TGPictureButton(fTop, 89 gClient->GetPicture("magiclogo.xpm"), M_PICTURE_MAGIC ); 90 fPicMagic->Associate(this) ; 91 fTop->AddFrame ( fPicMagic, new TGLayoutHints(kLHintsLeft, 10., 10., 20., 10.) ) ; 92 93 fPicMars = new TGPictureButton(fTop, 94 gClient->GetPicture("marslogo.xpm"), M_PICTURE_MARS ); 95 fPicMars->Associate(this) ; 96 fTop->AddFrame ( fPicMars, new TGLayoutHints(kLHintsLeft, 10., 10., 10., 10.) ) ; 97 98 AddFrame(fTop, new TGLayoutHints(kLHintsTop | kLHintsExpandX ) ); 99 100 // a seperator 101 102 fLineSep2 = new TGHorizontal3DLine(this) ; 103 AddFrame(fLineSep2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ); 104 105 // the low part of the frame 106 107 fLow = new TGHorizontalFrame (this, 300, 100 ) ; 108 109 // create the first tab 110 111 fTab = new TGTab ( fLow, 400, 400 ) ; 112 113 TGCompositeFrame *tf = fTab->AddTab("Control") ; 114 115 fTabF1 = new TGVerticalFrame (tf, 300, 100) ; 116 117 tf->AddFrame(fTabF1, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ) ; 118 119 // the buttons to go in the new window 120 121 fTabF2 = new TGVerticalFrame (tf, 300, 100) ; 122 123 fButLayout = new TGLayoutHints(kLHintsTop | kLHintsCenterX , 10, 10, 10, 10) ; 124 125 fButEvtDisp = new TGTextButton(fTabF2, "EventDisplay", M_BUTTON_EVTDISP ); 126 fButEvtDisp->Associate(this) ; 127 fTabF2->AddFrame(fButEvtDisp, fButLayout ) ; 128 129 fButDataCheck = new TGTextButton(fTabF2, "Data Check", M_BUTTON_DATACHECK ); 130 fButDataCheck->Associate(this) ; 131 fTabF2->AddFrame(fButDataCheck, fButLayout ) ; 132 133 fButAnalys = new TGTextButton(fTabF2, "Analysis", M_BUTTON_ANALYSE ); 134 fButAnalys->Associate(this) ; 135 fTabF2->AddFrame(fButAnalys, fButLayout ) ; 136 137 fButMonteCarlo = new TGTextButton(fTabF2, "MonteCarlo", M_BUTTON_MONTECARLO ); 138 fButMonteCarlo->Associate(this) ; 139 fTabF2->AddFrame(fButMonteCarlo, fButLayout ) ; 140 141 142 143 144 tf->AddFrame(fTabF2, new TGLayoutHints(kLHintsTop | kLHintsExpandX) ) ; 145 146 147 148 fLow->AddFrame ( fTab, new TGLayoutHints(kLHintsBottom | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5) ); 149 AddFrame(fLow, new TGLayoutHints(kLHintsTop | kLHintsExpandX ) ); 150 151 // Map the window, set up the layout, etc. 152 153 SetWMSizeHints(400, 650, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame 154 155 MapSubwindows(); 156 157 Layout(); 158 159 SetWindowName("MARS Main Window"); 160 SetIconName("MARS"); 161 162 MapWindow(); 163 163 { 164 // 165 // Create the deletion list 166 // 167 fList = new TList; 168 fList->SetOwner(); 169 170 // 171 // Create the MenuBar 172 // 173 CreateMenuBar(); 174 175 // 176 // create and layout the frame/contents 177 // 178 TGHorizontalFrame *top = new TGHorizontalFrame(this, 300, 100); 179 TGHorizontalFrame *low = new TGHorizontalFrame(this, 300, 100); 180 181 TGHorizontal3DLine *linesep = new TGHorizontal3DLine(this); 182 183 fList->Add(top); 184 fList->Add(low); 185 fList->Add(linesep); 186 187 CreateTopFrame(top); 188 CreateBottomFrame(low); 189 190 AddFrame(top, new TGLayoutHints(kLHintsTop|kLHintsExpandX)); 191 AddFrame(linesep, new TGLayoutHints(kLHintsTop|kLHintsExpandX)); 192 AddFrame(low, new TGLayoutHints(kLHintsTop|kLHintsExpandX)); 193 194 // 195 // Map the window, set up the layout, etc. 196 // 197 SetWMSizeHints(400, 650, 1000, 1000, 10, 10 ) ; // set the smallest and biggest size of the Main frame 198 199 MapSubwindows(); 200 201 Layout(); 202 203 SetWindowName("MARS Main Window"); 204 SetIconName("MARS"); 205 206 MapWindow(); 164 207 } 165 208 … … 168 211 MMars::~MMars() 169 212 { 170 171 delete fButLayout; 172 delete fLayMenuBar; 173 delete fLayMenuItem; 174 delete fButEvtDisp; 175 delete fButDataCheck; 176 delete fButAnalys; 177 delete fButMonteCarlo; 178 delete fPicMagic; 179 delete fPicMars; 180 delete fTabF1; 181 delete fTabF2; 182 delete fTab; 183 delete fLow; 184 delete fTop; 185 delete fLineSep2; 186 delete fLineSep; 187 delete fFileMenu; 188 delete fMenuBar; 213 gClient->FreePicture(fPic1); 214 gClient->FreePicture(fPic2); 215 216 delete fList; 189 217 } 190 218 // ====================================================================== … … 198 226 199 227 TGMainFrame::CloseWindow(); 200 gROOT->GetApplication()->Terminate(0) ;228 gROOT->GetApplication()->Terminate(0); 201 229 } 202 230 … … 253 281 return kTRUE; 254 282 255 CloseWindow() 283 CloseWindow(); 256 284 return kTRUE; 257 285 } -
trunk/MagicSoft/Mars/mmain/MMars.h
r765 r946 10 10 #endif 11 11 12 class TGTab; 13 class TGMenuBar; 14 class TGPopupMenu; 15 class TGTextButton; 16 class TGPictureButton; 17 class TGHorizontal3DLine; 12 class TList; 18 13 19 class MMars : public TGMainFrame { 20 private: 21 22 // 23 // Create a main frame with a number of different buttons. 24 // 14 class MMars : public TGMainFrame 15 { 16 private: 25 17 26 // the things for the menu bar 27 28 TGMenuBar *fMenuBar ; 29 TGPopupMenu *fFileMenu ; 30 TGLayoutHints *fLayMenuBar; 31 TGLayoutHints *fLayMenuItem ; 32 TGHorizontal3DLine *fLineSep ; 18 TList *fList; 33 19 34 // divide the Window in two different parts 35 36 TGHorizontalFrame *fTop ; // top part of the main window 37 TGHorizontal3DLine *fLineSep2 ; 38 TGHorizontalFrame *fLow ; // low part of the main window 39 TGTab *fTab ; // different tabs in the low window 40 41 // the object in the top part of the frame 42 43 TGPictureButton *fPicMagic; 44 TGPictureButton *fPicMars ; 45 46 // the object in the low part of the frame 47 48 TGVerticalFrame *fTabF1; 49 TGVerticalFrame *fTabF2 ; 50 51 TGTextButton *fButEvtDisp; 52 TGTextButton *fButDataCheck; 53 TGTextButton *fButAnalys; 54 TGTextButton *fButMonteCarlo ; 55 TGLayoutHints *fButLayout ; 20 const TGPicture *fPic1; 21 const TGPicture *fPic2; 56 22 57 void DisplWarning(const char *txt); 23 void CreateMenuBar(); 24 void CreateTopFrame(TGHorizontalFrame *top); 25 void CreateBottomFrame(TGHorizontalFrame *low); 58 26 59 public: 60 MMars(UInt_t w=400, UInt_t h=500) ; 61 62 ~MMars(); 63 64 void CloseWindow() ; 27 void DisplWarning(const char *txt); 65 28 66 Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); 29 public: 30 MMars(UInt_t w=400, UInt_t h=500); 67 31 68 ClassDef(MMars, 0) // GUI: Mars - the main window 69 } ; 32 ~MMars(); 33 34 void CloseWindow(); 35 36 Bool_t ProcessMessage(Long_t msg, Long_t parm1, Long_t parm2); 37 38 ClassDef(MMars, 0) // GUI: Mars - the main window 39 }; 70 40 71 41 #endif
Note:
See TracChangeset
for help on using the changeset viewer.