/[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.10 by mocchiut, Mon Jun 15 14:17:21 2009 UTC
# Line 443  PAMevcontrol::PAMevcontrol(const TGWindo Line 443  PAMevcontrol::PAMevcontrol(const TGWindo
443    
444  void PAMevcontrol::DIALOG(Int_t ty, TString warn){      void PAMevcontrol::DIALOG(Int_t ty, TString warn){    
445      //      //
446      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 3 -> ERROR      // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 2 -> ERROR
447      //      //
448      Int_t retval;      Int_t retval;
449      TString title;      TString title;
450      EMsgBoxIcon mb_icon = kMBIconStop;      EMsgBoxIcon mb_icon = kMBIconStop;
451      if ( ty == 0 ){      if ( ty == 2 ){
452            title="ERROR!!";
453            mb_icon = kMBIconStop;
454            new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
455        } else {
456          if ( ty == 0 ){
457          title="INFO";          title="INFO";
458          mb_icon = kMBIconAsterisk;          mb_icon = kMBIconAsterisk;
459      };        };
460      if ( ty == 1 ){        if ( ty == 1 ){
461          title="WARNING!";          title="WARNING!";
462          mb_icon = kMBIconExclamation;          mb_icon = kMBIconExclamation;
463          };      
464          const TGPicture *icon_pic;
465          switch (mb_icon) {
466          case kMBIconStop:
467            icon_pic = gClient->GetPicture("mb_stop_s.xpm");
468            if (!icon_pic) Error("TGMsgBox", "mb_stop_s.xpm not found");
469            break;
470            
471          case kMBIconQuestion:
472            icon_pic = gClient->GetPicture("mb_question_s.xpm");
473            if (!icon_pic) Error("TGMsgBox", "mb_question_s.xpm not found");
474            break;
475            
476          case kMBIconExclamation:
477            icon_pic = gClient->GetPicture("mb_exclamation_s.xpm");
478            if (!icon_pic) Error("TGMsgBox", "mb_exclamation_s.xpm not found");
479            break;
480            
481          case kMBIconAsterisk:
482            icon_pic = gClient->GetPicture("mb_asterisk_s.xpm");
483            if (!icon_pic) Error("TGMsgBox", "mb_asterisk_s.xpm not found");
484            break;
485            
486          default:
487            icon_pic = 0;
488            break;
489          }
490          //
491          TGTransientFrame *compofra = new TGTransientFrame(gClient->GetRoot(), 0, 200, 80, kHorizontalFrame);      
492          TGHorizontalFrame *fIconFrame = new TGHorizontalFrame(compofra, 98, 78);
493          TGIcon *fIcon = new TGIcon(fIconFrame, icon_pic, icon_pic->GetWidth(), icon_pic->GetHeight());
494          fIconFrame->AddFrame(fIcon, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
495          compofra->AddFrame(fIconFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
496          //
497          TGHorizontalFrame *fLabelFrame = new TGHorizontalFrame(compofra, 98, 78);
498          TGLabel *la=new TGLabel(fLabelFrame,warn.Data());
499          la->SetTextJustify(kLHintsCenterX);
500          fLabelFrame->AddFrame(la, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
501          compofra->AddFrame(fLabelFrame, new TGLayoutHints(kLHintsCenterX|kLHintsCenterY, 1, 1, 1, 1));
502          //                
503          compofra->SetWindowName(title.Data());
504          compofra->MapSubwindows();
505          compofra->Resize(compofra->GetDefaultWidth(),80);
506          compofra->CenterOnParent();
507          compofra->MapWindow();
508          //
509          Int_t kkk = 0;
510          while ( kkk < 200 ){
511            gSystem->ProcessEvents();
512            gSystem->Sleep(10);
513            kkk++;
514          };
515          if ( compofra ){
516            la->Delete();
517            fLabelFrame->Delete();
518            fIcon->Delete();
519            fIconFrame->Delete();
520            compofra->DestroyWindow();
521            compofra->Delete();    
522          };
523      };      };
524      if ( ty == 2 ){      //
         title="ERROR!!";  
         mb_icon = kMBIconStop;  
     };  
     new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);  
525  }  }
526    
527  void PAMevcontrol::refreshdec(Int_t n){  void PAMevcontrol::refreshdec(Int_t n){
# Line 569  void PAMevcontrol::SetFilename() { Line 630  void PAMevcontrol::SetFilename() {
630      TGTextEntry *entry = (TGTextEntry*)gTQSender;      TGTextEntry *entry = (TGTextEntry*)gTQSender;
631      TString text = entry->GetText();      TString text = entry->GetText();
632      cvar->thefilename=text.Data();      cvar->thefilename=text.Data();
633        cvar->i = 0;
634      cvar->nevents = 0;      cvar->nevents = 0;
635      cvar->firstevno = 0;      cvar->firstevno = 0;
636      cvar->lastevno = 0;      cvar->lastevno = 0;
# Line 759  void PAMevcontrol::StopSearching() { Line 821  void PAMevcontrol::StopSearching() {
821  void PAMevcontrol::RefreshButtons() {  void PAMevcontrol::RefreshButtons() {
822    if ( cvar->jumprog ){    if ( cvar->jumprog ){
823      jbwc1->SetState(kButtonDown);      jbwc1->SetState(kButtonDown);
824        jbwc0->SetState(kButtonUp);
825    } else {    } else {
826        jbwc1->SetState(kButtonUp);
827      jbwc0->SetState(kButtonDown);      jbwc0->SetState(kButtonDown);
828    };    };
829    if ( cvar->fl0 ){    if ( cvar->fl0 ){
# Line 770  void PAMevcontrol::RefreshButtons() { Line 834  void PAMevcontrol::RefreshButtons() {
834    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);    //  if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
835    if ( cvar->bw ){    if ( cvar->bw ){
836      bwc1->SetState(kButtonDown);      bwc1->SetState(kButtonDown);
837        bwc0->SetState(kButtonUp);
838    } else {    } else {
839      bwc0->SetState(kButtonDown);      bwc0->SetState(kButtonDown);
840        bwc1->SetState(kButtonUp);
841    };    };
842    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);    if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);
843    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);    if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.23