/[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.8 by mocchiut, Tue Oct 14 09:21:27 2008 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){
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.23