39 :
40 TGTransientFrame(p,
main, 360, 750) {
41
42
43
44 fWidgets = new TList();
45
46 this->SetBackgroundPixmap(GetPic("AboutBckgnd.gif"));
47
48
49 fTitleFrame = new TGHorizontalFrame(this, 10, 10);
50 fTitleFrame->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
51
52
53
54
55
56
57
58
59
60 FontStruct_t titlefont;
61 titlefont = gClient->GetFontByName(gEnv->GetValue("Gui.BoldFont",
62 "-adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-iso8859-1"));
63
64 GCValues_t gval;
65 gval.fMask = kGCFont;
66 gval.fFont = gVirtualX->GetFontHandle(titlefont);
67 GContext_t titlegc = gVirtualX->CreateGC(gClient->GetRoot()->GetId(), &gval);
68
69 TString
title(
"BesVis ");
70 title.Append(TString(TString(rcsname).Strip(TString::kBoth,
'$')).Remove(0,5).Data());
71 fTitle =
new TGLabel(fTitleFrame,
title.Data(), titlegc);
72 fLayout = new TGLayoutHints(kLHintsLeft | kLHintsCenterY, 10, 5, 5, 5);
73 fWidgets->Add(fLayout);
74
75
76 fLayout = new TGLayoutHints(kLHintsTop | kLHintsLeft, 0, 0, 75, 0);
77 fWidgets->Add(fLayout);
78 AddFrame(fTitleFrame, fLayout);
79
80
81 fMain = new TGTab(this, 300, 650);
82 fMain->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
83
84 TGCompositeFrame *tf;
85
86
87 tf = fMain->AddTab("About");
88 tf->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
89
90 fAbout = new TGVerticalFrame(tf, 200, 750);
91 fAbout->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
92 fLayout = new TGLayoutHints(kLHintsExpandX | kLHintsCenterY);
93 fWidgets->Add(fLayout);
94 tf->AddFrame(fAbout, fLayout);
95
96 fDescription1 = new TGLabel(fAbout, "BESIII Visualizaion Software");
97 fDescription1->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
98 fLayout = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY);
99 fWidgets->Add(fLayout);
100 fAbout->AddFrame(fDescription1, fLayout);
101
102 TString date((TString(TString(rcsdate).Strip(TString::kBoth, '$')).Remove(0,5)).Data());
103 fDescription2 = new TGLabel(fAbout, "");
104 fDescription2->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
105 fLayout = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY);
106 fWidgets->Add(fLayout);
107
108 fAbout->AddFrame(fDescription2, fLayout);
109 fDescription3 = new TGLabel(fAbout, "Developed by Zhengyun YOU in Peking University");
110 fDescription3->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
111 fLayout = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY);
112 fWidgets->Add(fLayout);
113 fAbout->AddFrame(fDescription3, fLayout);
114
116 fDescription4->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
117 fLayout = new TGLayoutHints(kLHintsCenterX | kLHintsCenterY);
118 fWidgets->Add(fLayout);
119 fAbout->AddFrame(fDescription4, fLayout);
120
121
122 tf = fMain->AddTab("Version");
123 tf->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
124
125 fVersion = new TGListBox(tf);
126 fVersion->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
127
128 fLayout = new TGLayoutHints(kLHintsExpandX | kLHintsExpandY, 2, 2, 2, 2);
129 fWidgets->Add(fLayout);
130 tf->AddFrame(fVersion, fLayout);
131
132
133 fVersion->AddEntry("2005-12-23", 0);
134 fVersion->AddEntry(" V 1.0.0", 0);
135 fVersion->AddEntry("", 0);
136
137
138
139 fVersion->Resize(80, 80);
140
141 for (Int_t iTab = 0; iTab < fMain->GetNumberOfTabs(); iTab++) {
142 fMain->GetTabTab(iTab)->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
143 }
144
145 fLayout = new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5);
146 fWidgets->Add(fLayout);
147 AddFrame(fMain, fLayout);
148
149
150 fBottomFrame = new TGHorizontalFrame(this, 10, 10);
151 fBottomFrame->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
152
153
154 fCloseBtn = new TGTextButton(fBottomFrame, " &Close ", 1);
155 fCloseBtn->Associate(this);
156 fCloseBtn->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
157 fLayout = new TGLayoutHints(kLHintsRight | kLHintsCenterY, 2, 2, 2, 2);
158 fWidgets->Add(fLayout);
159 fBottomFrame->AddFrame(fCloseBtn, fLayout);
160
161 fLayout = new TGLayoutHints(kLHintsBottom | kLHintsExpandX, 5, 5, 0, 5);
162 fWidgets->Add(fLayout);
163 AddFrame(fBottomFrame, fLayout);
164
165
166 tf = fMain->AddTab("Palette");
167 tf->SetBackgroundPixmap(GetPic("AboutGrey.gif"));
168
169 fMdcPaletteFrame= new TGVerticalFrame(tf, 200, 700);
170 fMdcPaletteFrame->SetBackgroundPixmap(GetPic("MdcPalette.gif"));
171 fLayout = new TGLayoutHints(kLHintsExpandX | kLHintsCenterY);
172 fWidgets->Add(fLayout);
173
174
175
176
177
178
179
180
181
182
183 SetWindowName("About BesVis");
184 MapSubwindows();
185
186
187 Int_t ax, ay;
188 Window_t wdum;
189 gVirtualX->TranslateCoordinates(
main->GetId(), GetParent()->GetId(),
190 (Int_t)(((TGFrame *)
main)->GetWidth() - fWidth) >> 1,
191 (Int_t)(((TGFrame *)
main)->GetHeight() - fHeight) >> 1,
192 ax, ay, wdum);
193 Move(ax, ay);
194 SetWMPosition(ax, ay);
195
196 Resize(GetDefaultSize());
197 Resize(360,750);
198 MapWindow();
199}