40 TGTransientFrame(p,
main, 360, 750) {
44 fWidgets =
new TList();
46 this->SetBackgroundPixmap(GetPic(
"AboutBckgnd.gif"));
49 fTitleFrame =
new TGHorizontalFrame(
this, 10, 10);
50 fTitleFrame->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
60 FontStruct_t titlefont;
61 titlefont = gClient->GetFontByName(gEnv->GetValue(
"Gui.BoldFont",
62 "-adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-iso8859-1"));
66 gval.fFont = gVirtualX->GetFontHandle(titlefont);
67 GContext_t titlegc = gVirtualX->CreateGC(gClient->GetRoot()->GetId(), &gval);
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);
76 fLayout =
new TGLayoutHints(kLHintsTop | kLHintsLeft, 0, 0, 75, 0);
77 fWidgets->Add(fLayout);
78 AddFrame(fTitleFrame, fLayout);
81 fMain =
new TGTab(
this, 300, 650);
82 fMain->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
87 tf = fMain->AddTab(
"About");
88 tf->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
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);
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);
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);
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);
116 fDescription4->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
117 fLayout =
new TGLayoutHints(kLHintsCenterX | kLHintsCenterY);
118 fWidgets->Add(fLayout);
119 fAbout->AddFrame(fDescription4, fLayout);
122 tf = fMain->AddTab(
"Version");
123 tf->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
125 fVersion =
new TGListBox(tf);
126 fVersion->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
128 fLayout =
new TGLayoutHints(kLHintsExpandX | kLHintsExpandY, 2, 2, 2, 2);
129 fWidgets->Add(fLayout);
130 tf->AddFrame(fVersion, fLayout);
133 fVersion->AddEntry(
"2005-12-23", 0);
134 fVersion->AddEntry(
" V 1.0.0", 0);
136 fVersion->AddEntry(
"2018-4-28", 0);
137 fVersion->AddEntry(
" V 2.0.0.B, contains MRPC", 0);
138 fVersion->AddEntry(
"", 0);
142 fVersion->Resize(80, 80);
144 for (Int_t iTab = 0; iTab < fMain->GetNumberOfTabs(); iTab++) {
145 fMain->GetTabTab(iTab)->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
148 fLayout =
new TGLayoutHints(kLHintsTop | kLHintsExpandX | kLHintsExpandY, 5, 5, 5, 5);
149 fWidgets->Add(fLayout);
150 AddFrame(fMain, fLayout);
153 fBottomFrame =
new TGHorizontalFrame(
this, 10, 10);
154 fBottomFrame->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
157 fCloseBtn =
new TGTextButton(fBottomFrame,
" &Close ", 1);
158 fCloseBtn->Associate(
this);
159 fCloseBtn->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
160 fLayout =
new TGLayoutHints(kLHintsRight | kLHintsCenterY, 2, 2, 2, 2);
161 fWidgets->Add(fLayout);
162 fBottomFrame->AddFrame(fCloseBtn, fLayout);
164 fLayout =
new TGLayoutHints(kLHintsBottom | kLHintsExpandX, 5, 5, 0, 5);
165 fWidgets->Add(fLayout);
166 AddFrame(fBottomFrame, fLayout);
169 tf = fMain->AddTab(
"Palette");
170 tf->SetBackgroundPixmap(GetPic(
"AboutGrey.gif"));
172 fMdcPaletteFrame=
new TGVerticalFrame(tf, 200, 700);
173 fMdcPaletteFrame->SetBackgroundPixmap(GetPic(
"MdcPalette.gif"));
174 fLayout =
new TGLayoutHints(kLHintsExpandX | kLHintsCenterY);
175 fWidgets->Add(fLayout);
186 SetWindowName(
"About BesVis");
192 gVirtualX->TranslateCoordinates(
main->GetId(), GetParent()->GetId(),
193 (Int_t)(((TGFrame *)
main)->GetWidth() - fWidth) >> 1,
194 (Int_t)(((TGFrame *)
main)->GetHeight() - fHeight) >> 1,
197 SetWMPosition(ax, ay);
199 Resize(GetDefaultSize());