Salome HOME
Gestion des messages d'erreur en mode information
[modules/homard.git] / src / HOMARDGUI / HOMARDGUI.cxx
index cd7a585b0a230a78660013856ce805c20770f883..b4050976326103e1ccca886c5ec8ef837c15c347 100644 (file)
@@ -1,3 +1,22 @@
+// Copyright (C) 2011-2013  CEA/DEN, EDF R&D
+//
+// This library is free software; you can redistribute it and/or
+// modify it under the terms of the GNU Lesser General Public
+// License as published by the Free Software Foundation; either
+// version 2.1 of the License.
+//
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+// Lesser General Public License for more details.
+//
+// You should have received a copy of the GNU Lesser General Public
+// License along with this library; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+//
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
+//
+
 //  File   : HOMARDGUI.cxx
 //  Author : Paul RASCLE, EDF
 //  Module : HOMARD
@@ -40,12 +59,18 @@ using namespace std;
 #include <QMenu>
 #include "MonCreateCase.h"
 #include "MonCreateIteration.h"
-#include "MonEditFile.h"
+#include "MonPursueIteration.h"
+#include "MonCreateYACS.h"
+#include "MonEditBoundaryAn.h"
+#include "MonEditBoundaryDi.h"
 #include "MonEditCase.h"
-#include "MonEditIteration.h"
 #include "MonEditHypothesis.h"
+#include "MonEditIteration.h"
+#include "MonEditYACS.h"
 #include "MonEditZone.h"
-#include "MonEditBoundaryDi.h"
+#include "MonMeshInfo.h"
+#include "MonIterInfo.h"
+#include "MonEditFile.h"
 #include "HomardQtCommun.h"
 
 // BOOST Includes
@@ -62,8 +87,7 @@ static CORBA::ORB_var _orb;
 // purpose  : Constructor
 //=======================================================================
 HOMARDGUI::HOMARDGUI(const QString&) :
-           SalomeApp_Module( "HOMARD" ), // default name
-           LightApp_Module( "HOMARD" )
+           SalomeApp_Module( "HOMARD" ) // default name
 {
 }
 
@@ -82,7 +106,7 @@ HOMARDGUI::~HOMARDGUI()
 //=======================================================================
 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
 {
-  Engines::Component_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
+  Engines::EngineComponent_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
   HOMARD::HOMARD_Gen_var clr = HOMARD::HOMARD_Gen::_narrow(comp);
   ASSERT(!CORBA::is_nil(clr));
   return clr;
@@ -106,6 +130,7 @@ void HOMARDGUI::initialize( CAM_Application* app )
 //================================================
 void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QString& icon_id, const int key, const bool toggle  )
 {
+//   MESSAGE("createHOMARDAction");
   QIcon icon;
   QWidget* parent = application()->desktop();
   SUIT_ResourceMgr* resMgr = application()->resourceMgr();
@@ -113,13 +138,13 @@ void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QS
   if ( icon_id.length() )
      pix = resMgr->loadPixmap( "HOMARD", tr( icon_id .toLatin1().data()) );
   else
-     pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data() ), false );
+     pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data()), false );
   if ( !pix.isNull() )
       icon = QIcon( pix );
 
-  QString tooltip    = tr( QString( "TOP_%1" ).arg( po_id ).toLatin1().data() ),
-          menu       = tr( QString( "MEN_%1" ).arg( po_id ).toLatin1().data() ),
-          status_bar = tr( QString( "STB_%1" ).arg( po_id ).toLatin1().data() );
+  QString tooltip    = tr(QString( "HOM_TOP_%1" ).arg( po_id ).toLatin1().data()),
+          menu       = tr(QString( "HOM_MEN_%1" ).arg( po_id ).toLatin1().data()),
+          status_bar = tr(QString( "HOM_STB_%1" ).arg( po_id ).toLatin1().data());
 
   createAction( id, tooltip, icon, menu, status_bar, key, parent, toggle, this, SLOT( OnGUIEvent() )  );
 }
@@ -131,15 +156,19 @@ void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QS
 //================================================
 void HOMARDGUI::createActions(){
 //
-  createHOMARDAction( 1101, "NEW_CASE",       "cas_calcule.png"  );
-  createHOMARDAction( 1102, "NEW_ITERATION",  "iter_next.png"    );
-  createHOMARDAction( 1111, "COMPUTE",        "mesh_compute.png" );
-  createHOMARDAction( 1120, "EDIT_CASE",      "whatis.png"       );
-  createHOMARDAction( 1121, "EDIT_ITERATION", "whatis.png"       );
-  createHOMARDAction( 1122, "EDIT_HYPO",      "whatis.png"       );
-  createHOMARDAction( 1123, "EDIT_ZONE",      "whatis.png"       );
-  createHOMARDAction( 1124, "EDIT_BOUNDARY",  "whatis.png"       );
-  createHOMARDAction( 1130, "EDIT_MESS_FILE", "texte.png"        );
+  createHOMARDAction( 1101, "NEW_CASE",         "cas_calcule.png"        );
+  createHOMARDAction( 1102, "PURSUE_ITERATION", "iter_poursuite.png"     );
+  createHOMARDAction( 1103, "NEW_ITERATION",    "iter_next.png"          );
+  createHOMARDAction( 1111, "COMPUTE",          "mesh_compute.png"       );
+  createHOMARDAction( 1121, "MESH_INFO",        "advanced_mesh_info.png" );
+//
+  createHOMARDAction( 1201, "EDIT",             "loop.png"         );
+  createHOMARDAction( 1211, "DELETE",           "delete.png"       );
+//
+  createHOMARDAction( 1301, "MESH_INFO",        "advanced_mesh_info.png" );
+  createHOMARDAction( 1302, "EDIT_MESS_FILE",   "texte.png"              );
+//
+  createHOMARDAction( 1401, "YACS",             "table_view.png" );
 //
 }
 
@@ -158,28 +187,47 @@ void HOMARDGUI::createPreferences(){
 
 //================================================
 // function : createMenus
-//                Verifier l'avant dernier nombre passe en parametre
 //================================================
 void HOMARDGUI::createMenus(){
-  int HOMARD_Id  = createMenu( tr( "HOMARD" ),  -1,  5, 10 );
+  MESSAGE("createMenus")
+//
+  int HOMARD_Id  = createMenu( tr( "HOM_MEN_HOMARD" ),  -1,  5, 10 );
   createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
-  createMenu( 1102, HOMARD_Id, -1 ); //Create_Iteration
+  createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
+  createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
   createMenu( 1111, HOMARD_Id, -1 ); //COMPUTE
+//
+  HOMARD_Id  = createMenu( tr( "HOM_MEN_MODIFICATION" ),  -1,  5, 10 );
+  createMenu( 1201, HOMARD_Id, -1 ); //Edit
+  createMenu( 1211, HOMARD_Id, -1 ); //Delete
+//
+  HOMARD_Id  = createMenu( tr( "HOM_MEN_INFORMATION" ),  -1,  5, 10 );
+  createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
   createMenu( separator(), HOMARD_Id,-1);
-  createMenu( 1120, HOMARD_Id, -1 ); //Edit_Case
-  createMenu( 1121, HOMARD_Id, -1 ); //Edit_Iteration
-  createMenu( 1122, HOMARD_Id, -1 ); //Edit Hypo
-  createMenu( 1123, HOMARD_Id, -1 ); //Edit_Zone
-  createMenu( 1124, HOMARD_Id, -1 ); //Edit_Boundary
+  createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
+  createMenu( separator(), HOMARD_Id,-1);
+  createMenu( 1201, HOMARD_Id, -1 ); //Edit
+  createMenu( separator(), HOMARD_Id,-1);
+//
+  HOMARD_Id  = createMenu( tr( "HOM_MEN_YACS" ),  -1,  5, 10 );
+  createMenu( 1401, HOMARD_Id, -1 ); // Création d'un schéma YACS
   createMenu( separator(), HOMARD_Id,-1);
-  createMenu( 1130, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
+//
+// La langue des preferences
+  SUIT_ResourceMgr* resMgr = getApp()->resourceMgr();
+  _LanguageShort = resMgr->stringValue("language", "language", "en");
+  MESSAGE("_LanguageShort " << _LanguageShort.toStdString().c_str() );
+//
+  SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
+  HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
+  homardGen->SetLanguageShort(_LanguageShort.toStdString().c_str());
 }
 
 //================================================
 void HOMARDGUI::OnGUIEvent()
 //================================================
 {
-  MESSAGE("HOMARDGUI::OnGUIEvent()")
+  MESSAGE("OnGUIEvent()")
   setOrb();
   const QObject* obj = sender();
   if ( !obj || !obj->inherits( "QAction" ) )
@@ -188,7 +236,7 @@ void HOMARDGUI::OnGUIEvent()
   bool ret;
   if ( id != -1 )
       ret = OnGUIEvent( id );
-  MESSAGE("************** End of HOMARDGUI::OnGUIEvent()");
+  MESSAGE("************** End of OnGUIEvent()");
 }
 
 //=======================================================================
@@ -196,7 +244,7 @@ void HOMARDGUI::OnGUIEvent()
 //=======================================================================
 bool HOMARDGUI::OnGUIEvent (int theCommandID)
 {
-  MESSAGE("HOMARDGUI::OnGUIEvent(int)");
+  MESSAGE("OnGUIEvent avec theCommandID = "<<theCommandID);
   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
   if ( !app ) return false;
 
@@ -221,24 +269,34 @@ bool HOMARDGUI::OnGUIEvent (int theCommandID)
    }
   getApp()->updateObjectBrowser();
 
+
   SCRUTE(theCommandID);
   switch (theCommandID)
   {
     case 1101: // Creation d un Cas
     {
       MESSAGE("command " << theCommandID << " activated");
-      MonCreateCase *aDlg = new MonCreateCase( parent, TRUE, 
+      MonCreateCase *aDlg = new MonCreateCase( true,
                             HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
       aDlg->show();
       break;
     }
 
-    case 1102: // Creation d une Iteration
+    case 1102: // Poursuite d une iteration
+    {
+      MESSAGE("command " << theCommandID << " activated");
+      MonPursueIteration *aDlg = new MonPursueIteration( parent, true,
+                                HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
+      aDlg->show();
+      break;
+    }
+
+    case 1103: // Creation d une Iteration
     {
       MESSAGE("command " << theCommandID << " activated");
       QString IterParentName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
       MESSAGE("IterParentName " << IterParentName.toStdString().c_str() << " choisi dans arbre");
-      MonCreateIteration *IterDlg = new MonCreateIteration( parent, true, 
+      MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
                                      HOMARD::HOMARD_Gen::_duplicate(homardGen), IterParentName ) ;
       IterDlg->show();
       break;
@@ -251,85 +309,225 @@ bool HOMARDGUI::OnGUIEvent (int theCommandID)
       if (monIter == QString("")) break;
       try
       {
-        homardGen->Compute(monIter.toStdString().c_str(), 0);
+        homardGen->Compute(monIter.toStdString().c_str(), 0, 1, -1, 1);
       }
       catch( SALOME::SALOME_Exception& S_ex )
       {
-        QMessageBox::information( 0, "Error",
-                    QString(CORBA::string_dup(S_ex.details.text)),
-                    QMessageBox::Ok + QMessageBox::Default );
+        QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                  QObject::tr(CORBA::string_dup(S_ex.details.text)) );
         getApp()->updateObjectBrowser();
         return false;
       }
       break;
     }
 
-    case 1120: // Edition d un cas
+    case 1121: // Information sur le maillage de l'iteration
     {
-      MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
-      _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and (HOMARD_UTILS::isCase(obj)))
-      {
-          MonEditCase *aDlg = new MonEditCase(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
-          aDlg->show();
-      }
+      MESSAGE("command " << theCommandID << " activated");
+      QString IterName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
+      MESSAGE("IterName " << IterName.toStdString().c_str() << " choisi dans arbre");
+      MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), IterName ) ;
+      IterDlg->show();
+      break;
     }
 
-    case 1121: // Edition d une iteration
+    case 1201: // Edition d'un objet
     {
-      MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
+      MESSAGE("command " << theCommandID << " activated");
+      QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
+      if (nomObjet == QString("")) break;
       _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and (HOMARD_UTILS::isIter(obj)))
+      if (obj)
       {
+        // Edition d'une frontiere discrete
+        if (HOMARD_UTILS::isBoundaryDi(obj))
+        {
+          MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
+          aDlg->show();
+        }
+        // Edition d'une frontiere analytique
+        else if (HOMARD_UTILS::isBoundaryAn(obj))
+        {
+          MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
+          aDlg->show();
+        }
+        // Edition d'un cas
+        else if (HOMARD_UTILS::isCase(obj))
+        {
+          MonEditCase *aDlg = new MonEditCase(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
+          aDlg->show();
+        }
+        // Edition d'une hypothese
+        else if (HOMARD_UTILS::isHypo(obj))
+        {
+          MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
+          aDlg->show();
+        }
+        // Edition d'une iteration
+        else if (HOMARD_UTILS::isIter(obj))
+        {
           MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
           aDlg->show();
+        }
+        // Edition d'un schema YACS
+        else if (HOMARD_UTILS::isYACS(obj))
+        {
+          MESSAGE("appel de MonEditYACS");
+          MonEditYACS *aDlg = new MonEditYACS(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName) ;
+          aDlg->show();
+        }
+        // Edition d'une zone
+        else if (HOMARD_UTILS::isZone(obj))
+        {
+          MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
+          aDlg->show();
+        }
       }
+      break;
     }
 
-    case 1122: // Edition d une hypothese
+    case 1211: // Suppression d'un objet
     {
-      MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
+      MESSAGE("command " << theCommandID << " activated");
+      QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
+      if (nomObjet == QString("")) break;
       _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and (HOMARD_UTILS::isHypo(obj)))
+      if (obj)
       {
-          MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
-          aDlg->show();
+        // Suppression d'une frontiere
+        if ( HOMARD_UTILS::isBoundaryDi(obj) or HOMARD_UTILS::isBoundaryAn(obj) )
+        {
+          try
+          { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
+        // Suppression d'un cas
+        else if (HOMARD_UTILS::isCase(obj))
+        {
+          try
+          { homardGen->DeleteCase(_ObjectName.toStdString().c_str(), 1); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
+        // Suppression d'une hypothese
+        else if (HOMARD_UTILS::isHypo(obj))
+        {
+          try
+          { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
+        // Suppression d'une iteration
+        else if (HOMARD_UTILS::isIter(obj))
+        {
+          try
+          { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
+        // Suppression d'un schema YACS
+        else if (HOMARD_UTILS::isYACS(obj))
+        {
+          try
+          { homardGen->DeleteYACS(_ObjectName.toStdString().c_str(), 1); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
+        // Suppression d'une zone
+        else if (HOMARD_UTILS::isZone(obj))
+        {
+          try
+          { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
+          catch( SALOME::SALOME_Exception& S_ex )
+          {
+            QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                      QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+            getApp()->updateObjectBrowser();
+            return false;
+          }
+        }
       }
+      break;
     }
 
-    case 1123: // Edition d une zone
+    case 1301: // Information sur un maillage
     {
-      MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
-      _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and (HOMARD_UTILS::isZone(obj)))
-      {
-          MonEditZone *aDlg = new MonEditZone(0, TRUE, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
-          aDlg->show();
-      }
+      MESSAGE("etape 1301")
+      MESSAGE("command " << theCommandID << " activated");
+      MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
+      aDlg->show();
+      break;
     }
 
-    case 1124: // Edition d une frontiere
+    case 1302: // Affichage de fichier texte
     {
       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
       _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and (HOMARD_UTILS::isBoundaryDi(obj)))
+      if ( (obj) and ( HOMARD_UTILS::isFileType(obj,QString("log")) or HOMARD_UTILS::isFileType(obj,QString("Summary")) or HOMARD_UTILS::isFileType(obj,QString("xml")) ) )
       {
-          MESSAGE(".. Lancement de MonEditBoundaryDi" );
-          MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, TRUE, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
-          aDlg->show();
+          MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName, 0 ) ;
+          if ( aDlg->_codret == 0 ) { aDlg->show(); }
       }
+      break;
     }
 
-    case 1130: // Edition du fichier mess
+    case 1401: // Création d'un schéma YACS
     {
-      MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
-      _PTR(SObject) obj = chercheMonObjet();
-      if ((obj) and ((HOMARD_UTILS::isFileMess(obj) or HOMARD_UTILS::isFileSummary(obj))))
+      MESSAGE("etape 1401")
+      MESSAGE("command " << theCommandID << " activated");
+      QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("CasHomard"), 1);
+      MESSAGE("Name " << Name.toStdString().c_str() << " choisi dans arbre");
+      MonCreateYACS *aDlg = new MonCreateYACS( true, HOMARD::HOMARD_Gen::_duplicate(homardGen), Name ) ;
+      aDlg->show();
+      break;
+    }
+
+    case 1402: // Ecriture d'un schéma YACS
+    {
+      MESSAGE("etape 1402")
+      MESSAGE("command " << theCommandID << " activated");
+      QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("YACSHomard"), 1);
+      if (Name == QString("")) break;
+      try
       {
-          MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
-          aDlg->show();
+        homardGen->YACSWrite(Name.toStdString().c_str());
+      }
+      catch( SALOME::SALOME_Exception& S_ex )
+      {
+        QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
+                                  QObject::tr(CORBA::string_dup(S_ex.details.text)) );
+        getApp()->updateObjectBrowser();
+        return false;
       }
-     }
+      break;
+    }
+
   }
   getApp()->updateObjectBrowser();
   return true;
@@ -388,13 +586,13 @@ void HOMARDGUI::windows( QMap<int, int>& theMap ) const
 void HOMARDGUI::setOrb()
 //=============================================================================
 {
-  try 
+  try
   {
      ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
      ASSERT(SINGLETON_<ORB_INIT>::IsAlreadyExisting());
      _orb = init( 0 , 0 );
-  } 
-  catch (...) 
+  }
+  catch (...)
   {
      INFOS("internal error : orb not found");
      _orb = 0;
@@ -405,22 +603,20 @@ void HOMARDGUI::setOrb()
 _PTR(SObject) HOMARDGUI::chercheMonObjet()
 //========================================
 {
-
-    SALOMEDSClient_SObject* aSO = NULL;
-    _PTR(SObject) obj;
-    SALOME_ListIO lst;
-    getApp()->selectionMgr()->selectedObjects( lst );
-    if (  lst.Extent() == 1 ) 
-    {
-       Handle(SALOME_InteractiveObject) io = lst.First();
-       SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
-       _PTR(Study) study = appStudy->studyDS();
-       _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
-       _ObjectName = QString( obj->GetName().c_str() );
-        return obj;
-     }
-     else
-         return _PTR(SObject)(aSO);
+  SALOMEDSClient_SObject* aSO = NULL;
+  _PTR(SObject) obj;
+  SALOME_ListIO lst;
+  getApp()->selectionMgr()->selectedObjects( lst );
+  if (  lst.Extent() == 1 )
+  {
+    Handle(SALOME_InteractiveObject) io = lst.First();
+    SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
+    _PTR(Study) study = appStudy->studyDS();
+    _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
+    _ObjectName = QString( obj->GetName().c_str() );
+    return obj;
+  }
+  else { return _PTR(SObject)(aSO); }
 }
 //=============================================================================
 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
@@ -434,46 +630,78 @@ void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& t
     _ObjectName = title;
     SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
 //
-    if ( HOMARD_UTILS::isBoundaryDi(obj) )
+    QPixmap pix ;
+    bool DeleteObject = false ;
+    bool EditObject = false ;
+//
+    if ( HOMARD_UTILS::isBoundaryAn(obj) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "whatis.png" );
-      menu->addAction(QIcon(pix), "Edit boundary", this,SLOT(EditBoDi()));
+      EditObject = true ;
+      DeleteObject = true ;
     }
-    else if ( HOMARD_UTILS::isZone(obj) )
+    else if ( HOMARD_UTILS::isBoundaryDi(obj) )
+    {
+      EditObject = true ;
+      DeleteObject = true ;
+    }
+    else if ( HOMARD_UTILS::isCase(obj) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "whatis.png" );
-      menu->addAction(QIcon(pix), "Edit zone", this,SLOT(EditZone()));
+      pix = resMgr->loadPixmap( "HOMARD", "table_view.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSCreate()));
+      EditObject = true ;
+      DeleteObject = true ;
     }
     else if ( HOMARD_UTILS::isHypo(obj) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "whatis.png" );
-      menu->addAction(QIcon(pix), "Edit hypothesis", this,SLOT(EditHypo()));
+      EditObject = true ;
+      DeleteObject = true ;
     }
     else if ( HOMARD_UTILS::isIter(obj) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
-      menu->addAction(QIcon(pix), "Next iteration", this,SLOT(NextIter()));
-      QPixmap pix1 = resMgr->loadPixmap( "HOMARD", "whatis.png" );
-      menu->addAction(QIcon(pix1), "Edit iteration", this,SLOT(EditIter()));
+      pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this, SLOT(NextIter()));
       QPixmap pix2 = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
-      menu->addAction(QIcon(pix2), "Compute", this,SLOT(LanceCalcul()));
+      menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul()));
+      pix2 = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
+      menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
+      EditObject = true ;
+      DeleteObject = true ;
     }
-    else if ( HOMARD_UTILS::isCase(obj) )
+    else if ( HOMARD_UTILS::isYACS(obj) )
+    {
+      pix = resMgr->loadPixmap( "HOMARD", "write.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_WRITE").toLatin1().data()), this, SLOT(YACSWrite()));
+      EditObject = true ;
+      DeleteObject = true ;
+    }
+    else if ( HOMARD_UTILS::isZone(obj) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "whatis.png" );
-      menu->addAction(QIcon(pix), "Edit case", this,SLOT(EditCase()));
+      EditObject = true ;
+      DeleteObject = true ;
     }
-    else if ( HOMARD_UTILS::isFileMess(obj) or HOMARD_UTILS::isFileSummary(obj) )
+    else if ( HOMARD_UTILS::isFileType(obj,QString("log")) or HOMARD_UTILS::isFileType(obj,QString("Summary")) or HOMARD_UTILS::isFileType(obj,QString("xml")) )
     {
-      QPixmap pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
-      menu->addAction(QIcon(pix), "Show file", this,SLOT(EditAsciiFile()));
+      pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this, SLOT(EditAsciiFile()));
+    }
+//  Ajout d'un menu d'edition pour les objets qui le proposent
+    if ( EditObject )
+    {
+      pix = resMgr->loadPixmap( "HOMARD", "loop.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this, SLOT(Edit()));
+    }
+//  Ajout d'un menu de destruction pour les objets qui le proposent
+    if ( DeleteObject )
+    {
+      pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
+      menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this, SLOT(Delete()));
     }
   }
 }
 
 void HOMARDGUI::NextIter()
 {
-  this->OnGUIEvent(1102);
+  this->OnGUIEvent(1103);
 }
 
 void HOMARDGUI::LanceCalcul()
@@ -481,35 +709,36 @@ void HOMARDGUI::LanceCalcul()
   this->OnGUIEvent(1111);
 }
 
-void HOMARDGUI::EditCase()
+void HOMARDGUI::IterInfo()
 {
-  this->OnGUIEvent(1120);
+  this->OnGUIEvent(1121);
 }
 
-void HOMARDGUI::EditIter() 
+void HOMARDGUI::Edit()
 {
-  this->OnGUIEvent(1121); 
+  this->OnGUIEvent(1201);
 }
 
-void HOMARDGUI::EditHypo()
+void HOMARDGUI::Delete()
 {
-  this->OnGUIEvent(1122);
+  this->OnGUIEvent(1211);
 }
 
-void HOMARDGUI::EditZone()
+void HOMARDGUI::EditAsciiFile()
 {
-  this->OnGUIEvent(1123);
+  this->OnGUIEvent(1302);
 }
 
-void HOMARDGUI::EditBoDi()
+void HOMARDGUI::YACSCreate()
 {
-  this->OnGUIEvent(1124);
+  this->OnGUIEvent(1401);
 }
-
-void HOMARDGUI::EditAsciiFile()
+void HOMARDGUI::YACSWrite()
 {
-  this->OnGUIEvent(1130);
+  this->OnGUIEvent(1402);
 }
+
+
 //
 //=============================================================================
 // Export the module