/[PAMELA software]/eventviewer/flight/src/FEVpamevcontrol.cpp
ViewVC logotype

Diff of /eventviewer/flight/src/FEVpamevcontrol.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by mocchiut, Thu Nov 8 14:00:53 2007 UTC revision 1.12 by mocchiut, Wed Jan 11 16:27:33 2012 UTC
# Line 104  PAMevcontrol::PAMevcontrol(const TGWindo Line 104  PAMevcontrol::PAMevcontrol(const TGWindo
104    cvar = &var;    cvar = &var;
105    thefigure = &figure;    thefigure = &figure;
106    //    //
107    cframe1 = new TGCompositeFrame(this, 280, 40, kVerticalFrame);    cframe1 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
108    TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
109    TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
110    TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);    TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
# Line 123  PAMevcontrol::PAMevcontrol(const TGWindo Line 123  PAMevcontrol::PAMevcontrol(const TGWindo
123    TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,400,80);    TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,400,80);
124    TGHorizontalFrame *hframe = new TGHorizontalFrame(this,400,800);    TGHorizontalFrame *hframe = new TGHorizontalFrame(this,400,800);
125    for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);    for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);
126    TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 40);    TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 60);
127    TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);    TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);
128    TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 40);    TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 60);
129    TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,400,800);    TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,400,800);
130    //    //
131    TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);    TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);
# Line 288  PAMevcontrol::PAMevcontrol(const TGWindo Line 288  PAMevcontrol::PAMevcontrol(const TGWindo
288    fchkinfo = new TGCheckButton(hframe3, "Infos");      fchkinfo = new TGCheckButton(hframe3, "Infos");  
289    fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");      fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");  
290    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);
291    hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));    hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
292    //    //
293    fchknames = new TGCheckButton(hframe3, "Names");      fchknames = new TGCheckButton(hframe3, "Names");  
294    fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");      fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");  
295    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);
296    hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));    hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,1,5,5));
297    
298    fchkpalette = new TGCheckButton(hframe3, "Palette");      fchkpalette = new TGCheckButton(hframe3, "Palette");  
299    fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");      fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");  
300    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);
301    hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,10,5,5,5));    hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,2,5,5));
302    
303      fchktrigger = new TGCheckButton(hframe3, "Trigger");  
304      fchktrigger->Connect("Clicked()","PAMevcontrol",this,"chktrigger()");  
305      if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown);
306      hframe3->AddFrame(fchktrigger, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,1,2,5,5));
307    
308    gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));    gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));
309    //    //
310    TGVButtonGroup *group = new TGVButtonGroup(hframe4);    TGVButtonGroup *group = new TGVButtonGroup(hframe4);
# Line 441  PAMevcontrol::PAMevcontrol(const TGWindo Line 448  PAMevcontrol::PAMevcontrol(const TGWindo
448    //    //
449  }  }
450    
451    void PAMevcontrol::Refresh(){
452      // bah
453      return;
454      this->Clear();
455      MapSubwindows();
456      // Initialize the layout algorithm
457      Resize(GetDefaultSize());
458      // Map main frame
459      MapWindow();  
460    }
461    
462  void PAMevcontrol::DIALOG(Int_t ty, TString warn){      void PAMevcontrol::DIALOG(Int_t ty, TString warn){    
463      //      //
464      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 3 -> ERROR      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 2 -> ERROR
465      //      //
466      Int_t retval;      Int_t retval;
467      TString title;      TString title;
468      EMsgBoxIcon mb_icon = kMBIconStop;      EMsgBoxIcon mb_icon = kMBIconStop;
469      if ( ty == 0 ){      if ( ty == 2 || ty == 3 ){
470          if ( ty == 2 ){
471            title="ERROR!!";
472            mb_icon = kMBIconStop;
473            new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
474          } else {
475            title="HELP";
476            mb_icon = kMBIconQuestion;
477            new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
478          };
479        } else {
480          if ( ty == 0 ){
481          title="INFO";          title="INFO";
482          mb_icon = kMBIconAsterisk;          mb_icon = kMBIconAsterisk;
483      };        };
484      if ( ty == 1 ){        if ( ty == 1 ){
485          title="WARNING!";          title="WARNING!";
486          mb_icon = kMBIconExclamation;          mb_icon = kMBIconExclamation;
487          };      
488          if ( ty == 4 ){
489            title="DATA";
490            mb_icon = kMBIconExclamation;
491          };
492          const TGPicture *icon_pic;
493          switch (mb_icon) {
494          case kMBIconStop:
495            icon_pic = gClient->GetPicture("mb_stop_s.xpm");
496            if (!icon_pic) Error("TGMsgBox", "mb_stop_s.xpm not found");
497            break;
498            
499          case kMBIconQuestion:
500            icon_pic = gClient->GetPicture("mb_question_s.xpm");
501            if (!icon_pic) Error("TGMsgBox", "mb_question_s.xpm not found");
502            break;
503            
504          case kMBIconExclamation:
505            icon_pic = gClient->GetPicture("mb_exclamation_s.xpm");
506            if (!icon_pic) Error("TGMsgBox", "mb_exclamation_s.xpm not found");
507            break;
508            
509          case kMBIconAsterisk:
510            icon_pic = gClient->GetPicture("mb_asterisk_s.xpm");
511            if (!icon_pic) Error("TGMsgBox", "mb_asterisk_s.xpm not found");
512            break;
513            
514          default:
515            icon_pic = 0;
516            break;
517          }
518          //
519          if ( ty == 4 ){// non funziona il recupero dei puntatori a questi oggetti come e` possibile?
520            //      gObjectTable->Print();
521            TGLabel *la=dynamic_cast<TGLabel*>(gDirectory->FindObject("la"));
522            TGHorizontalFrame *fLabelFrame=dynamic_cast<TGHorizontalFrame*>(gDirectory->FindObject("fLabelFrame"));
523            TGTransientFrame *compofra=dynamic_cast<TGTransientFrame*>(gDirectory->FindObject("compofra"));
524            if ( la ) la->Delete();
525            if ( fLabelFrame ) fLabelFrame->Delete();
526            if ( compofra ){
527              compofra->DestroyWindow();
528              compofra->Delete();  
529            };
530          };
531          TGTransientFrame *compofra = new TGTransientFrame(gClient->GetRoot(), 0, 200, 80, kHorizontalFrame);      
532          TGHorizontalFrame *fIconFrame = NULL;
533          TGIcon *fIcon = NULL;
534          if ( ty != 4 ){
535            compofra->DontCallClose();      
536            fIconFrame = new TGHorizontalFrame(compofra, 98, 78);
537            fIcon = new TGIcon(fIconFrame, icon_pic, icon_pic->GetWidth(), icon_pic->GetHeight());
538            fIconFrame->AddFrame(fIcon, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
539            compofra->AddFrame(fIconFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
540          };
541          //
542          TGHorizontalFrame *fLabelFrame = new TGHorizontalFrame(compofra, 98, 78);
543          TGLabel *la=new TGLabel(fLabelFrame,warn.Data());
544          la->SetTextJustify(kLHintsCenterX);
545          fLabelFrame->AddFrame(la, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
546          compofra->AddFrame(fLabelFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
547          //                
548          compofra->SetWindowName(title.Data());
549          compofra->MapSubwindows();
550          if ( ty != 4 ){
551            compofra->Resize(compofra->GetDefaultWidth(),80);
552          } else {
553            compofra->Resize(compofra->GetDefaultSize());
554          };
555          compofra->CenterOnParent();
556          compofra->MapWindow();
557          //
558          if ( ty != 4 ){
559            Int_t kkk = 0;
560            while ( kkk < 200 ){
561              gSystem->ProcessEvents();
562              gSystem->Sleep(10);
563              kkk++;
564            };
565          };
566          if ( compofra && ty != 4 ){
567            la->Delete();
568            fLabelFrame->Delete();
569            if ( fIcon ) fIcon->Delete();
570            if ( fIconFrame ) fIconFrame->Delete();
571            compofra->DestroyWindow();
572            compofra->Delete();    
573          };
574      };      };
575      if ( ty == 2 ){      //
         title="ERROR!!";  
         mb_icon = kMBIconStop;  
     };  
     new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);  
576  }  }
577    
578  void PAMevcontrol::refreshdec(Int_t n){  void PAMevcontrol::refreshdec(Int_t n){
# Line 569  void PAMevcontrol::SetFilename() { Line 681  void PAMevcontrol::SetFilename() {
681      TGTextEntry *entry = (TGTextEntry*)gTQSender;      TGTextEntry *entry = (TGTextEntry*)gTQSender;
682      TString text = entry->GetText();      TString text = entry->GetText();
683      cvar->thefilename=text.Data();      cvar->thefilename=text.Data();
684        cvar->i = 0;
685      cvar->nevents = 0;      cvar->nevents = 0;
686      cvar->firstevno = 0;      cvar->firstevno = 0;
687      cvar->lastevno = 0;      cvar->lastevno = 0;
# Line 759  void PAMevcontrol::StopSearching() { Line 872  void PAMevcontrol::StopSearching() {
872  void PAMevcontrol::RefreshButtons() {  void PAMevcontrol::RefreshButtons() {
873    if ( cvar->jumprog ){    if ( cvar->jumprog ){
874      jbwc1->SetState(kButtonDown);      jbwc1->SetState(kButtonDown);
875        jbwc0->SetState(kButtonUp);
876    } else {    } else {
877        jbwc1->SetState(kButtonUp);
878      jbwc0->SetState(kButtonDown);      jbwc0->SetState(kButtonDown);
879    };    };
880    if ( cvar->fl0 ){    if ( cvar->fl0 ){
# Line 770  void PAMevcontrol::RefreshButtons() { Line 885  void PAMevcontrol::RefreshButtons() {
885    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
886    if ( cvar->bw ){    if ( cvar->bw ){
887      bwc1->SetState(kButtonDown);      bwc1->SetState(kButtonDown);
888        bwc0->SetState(kButtonUp);
889    } else {    } else {
890      bwc0->SetState(kButtonDown);      bwc0->SetState(kButtonDown);
891        bwc1->SetState(kButtonUp);
892    };    };
893      if ( cvar->PATTRIG) fchktrigger->SetState(kButtonDown); else fchktrigger->SetState(kButtonUp);
894    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);
895    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);
896    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);    if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);
# Line 1225  void PAMevcontrol::chkpalette() { Line 1343  void PAMevcontrol::chkpalette() {
1343    cvar->goon = true;    cvar->goon = true;
1344  }  }
1345    
1346    void PAMevcontrol::chktrigger() {
1347      if ( cvar->PATTRIG ) {
1348        cvar->PATTRIG = 0;
1349      } else {
1350        cvar->PATTRIG = 1;
1351      };
1352      cvar->i--;
1353      cvar->goon = true;
1354    }
1355    
1356  void PAMevcontrol::next() {  void PAMevcontrol::next() {
1357    SetSearching();    SetSearching();
1358    if ( cvar->i == cvar->nevents-1  ) {    if ( cvar->i == cvar->nevents-1  ) {
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.23