Salome HOME
Schémas YACS - suite
[modules/homard.git] / src / HOMARDGUI / HOMARDGUI.cxx
1 // Copyright (C) 2011-2013  CEA/DEN, EDF R&D
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 //  File   : HOMARDGUI.cxx
21 //  Author : Paul RASCLE, EDF
22 //  Module : HOMARD
23
24 using namespace std;
25 #include "HOMARDGUI.h"
26
27 // SALOME Includes
28 #include "Utils_ORB_INIT.hxx"
29 #include "Utils_SINGLETON.hxx"
30 #include "SALOME_LifeCycleCORBA.hxx"
31
32 #include "SUIT_ResourceMgr.h"
33 #include "SUIT_MessageBox.h"
34 #include "SUIT_Session.h"
35 #include "SUIT_ViewWindow.h"
36 #include "SUIT_ViewManager.h"
37 #include <SUIT_Desktop.h>
38
39 #include "CAM_Module.h"
40 #include "OB_Browser.h"
41
42 #include "SALOME_ListIO.hxx"
43 #include "SALOME_ListIteratorOfListIO.hxx"
44
45 #include "SalomeApp_Application.h"
46 #include "SalomeApp_DataModel.h"
47 #include "SalomeApp_Study.h"
48 #include "LightApp_SelectionMgr.h"
49 #include "LightApp_Selection.h"
50 #include <LightApp_Preferences.h>
51 #include "SalomeApp_Module.h"
52 #include "SALOMEconfig.h"
53 #include <SALOME_LifeCycleCORBA.hxx>
54
55 #include <utilities.h>
56
57
58 // QT Includes
59 #include <QMenu>
60 #include "MonCreateCase.h"
61 #include "MonCreateIteration.h"
62 #include "MonPursueIteration.h"
63 #include "MonCreateYACS.h"
64 #include "MonEditBoundaryAn.h"
65 #include "MonEditBoundaryDi.h"
66 #include "MonEditCase.h"
67 #include "MonEditHypothesis.h"
68 #include "MonEditIteration.h"
69 #include "MonEditYACS.h"
70 #include "MonEditZone.h"
71 #include "MonMeshInfo.h"
72 #include "MonIterInfo.h"
73 #include "MonEditFile.h"
74 #include "HomardQtCommun.h"
75
76 // BOOST Includes
77 #include <boost/shared_ptr.hpp>
78
79 //Pour le _CAST
80 #include "SALOMEDS_Study.hxx"
81 #include "HOMARDGUI_Utils.h"
82
83 static CORBA::ORB_var _orb;
84
85 //=======================================================================
86 // function : HOMARDGUI()
87 // purpose  : Constructor
88 //=======================================================================
89 HOMARDGUI::HOMARDGUI(const QString&) :
90            SalomeApp_Module( "HOMARD" ) // default name
91 {
92 }
93
94
95 //=======================================================================
96 // function : ~HOMARDGUI()
97 // purpose  : Destructor
98 //=======================================================================
99 HOMARDGUI::~HOMARDGUI()
100 {
101 }
102
103 //=======================================================================
104 // function : InitHOMARDGen
105 // launch HOMARD component and return a handle
106 //=======================================================================
107 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
108 {
109   Engines::EngineComponent_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
110   HOMARD::HOMARD_Gen_var clr = HOMARD::HOMARD_Gen::_narrow(comp);
111   ASSERT(!CORBA::is_nil(clr));
112   return clr;
113 }
114
115 //=======================================================================
116 // Module's initialization
117 void HOMARDGUI::initialize( CAM_Application* app )
118 //=======================================================================
119 {
120   SalomeApp_Module::initialize( app );
121   InitHOMARDGen(dynamic_cast<SalomeApp_Application*>( app ));
122   anId = 0;
123   createActions();
124   createMenus();
125 }
126
127 //================================================
128 // function : createHOMARDAction
129 // create an item in status bar and Homard menu
130 //================================================
131 void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QString& icon_id, const int key, const bool toggle  )
132 {
133 //   MESSAGE("createHOMARDAction");
134   QIcon icon;
135   QWidget* parent = application()->desktop();
136   SUIT_ResourceMgr* resMgr = application()->resourceMgr();
137   QPixmap pix;
138   if ( icon_id.length() )
139      pix = resMgr->loadPixmap( "HOMARD", tr( icon_id .toLatin1().data()) );
140   else
141      pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data()), false );
142   if ( !pix.isNull() )
143       icon = QIcon( pix );
144
145   QString tooltip    = tr(QString( "HOM_TOP_%1" ).arg( po_id ).toLatin1().data()),
146           menu       = tr(QString( "HOM_MEN_%1" ).arg( po_id ).toLatin1().data()),
147           status_bar = tr(QString( "HOM_STB_%1" ).arg( po_id ).toLatin1().data());
148
149   createAction( id, tooltip, icon, menu, status_bar, key, parent, toggle, this, SLOT( OnGUIEvent() )  );
150 }
151
152 //================================================
153 // function : createAction
154 // constructs Homard menu
155 // calls createHOMARDAction for each item
156 //================================================
157 void HOMARDGUI::createActions(){
158 //
159   createHOMARDAction( 1101, "NEW_CASE",         "cas_calcule.png"        );
160   createHOMARDAction( 1102, "PURSUE_ITERATION", "iter_poursuite.png"     );
161   createHOMARDAction( 1103, "NEW_ITERATION",    "iter_next.png"          );
162   createHOMARDAction( 1111, "COMPUTE",          "mesh_compute.png"       );
163   createHOMARDAction( 1121, "MESH_INFO",        "advanced_mesh_info.png" );
164 //
165   createHOMARDAction( 1201, "EDIT",             "loop.png"         );
166   createHOMARDAction( 1211, "DELETE",           "delete.png"       );
167 //
168   createHOMARDAction( 1301, "MESH_INFO",        "advanced_mesh_info.png" );
169   createHOMARDAction( 1302, "EDIT_MESS_FILE",   "texte.png"              );
170 //
171   createHOMARDAction( 1401, "YACS",             "table_view.png" );
172 //
173 }
174
175 //================================================
176 // function : createPreferences
177 // No preferences for Homard
178 // Just a test
179 //================================================
180 void HOMARDGUI::createPreferences(){
181    QString toto = tr( "PREF_GROUP_GENERAL" );
182    int tabId  = addPreference( tr( "PREF_GROUP_GENERAL" ) );
183    int genGroup = addPreference( tr( "PREF_TAB_SETTINGS" ), tabId );
184    addPreference( tr( "PREF_TEST" ), genGroup, LightApp_Preferences::Color, "Homard", "shading_color" );
185 }
186
187
188 //================================================
189 // function : createMenus
190 //                Verifier l'avant dernier nombre passe en parametre
191 //================================================
192 void HOMARDGUI::createMenus(){
193   MESSAGE("createMenus")
194 //
195   int HOMARD_Id  = createMenu( tr( "HOM_MEN_HOMARD" ),  -1,  5, 10 );
196   createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
197   createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
198   createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
199   createMenu( 1111, HOMARD_Id, -1 ); //COMPUTE
200 //
201   HOMARD_Id  = createMenu( tr( "HOM_MEN_MODIFICATION" ),  -1,  5, 10 );
202   createMenu( 1201, HOMARD_Id, -1 ); //Edit
203   createMenu( 1211, HOMARD_Id, -1 ); //Delete
204 //
205   HOMARD_Id  = createMenu( tr( "HOM_MEN_INFORMATION" ),  -1,  5, 10 );
206   createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
207   createMenu( separator(), HOMARD_Id,-1);
208   createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
209   createMenu( separator(), HOMARD_Id,-1);
210   createMenu( 1201, HOMARD_Id, -1 ); //Edit
211   createMenu( separator(), HOMARD_Id,-1);
212 //
213   HOMARD_Id  = createMenu( tr( "HOM_MEN_YACS" ),  -1,  5, 10 );
214   createMenu( 1401, HOMARD_Id, -1 ); // Création d'un schéma YACS
215   createMenu( separator(), HOMARD_Id,-1);
216 //
217 /*// La langue des preferences
218   SUIT_ResourceMgr* resMgr = getApp()->resourceMgr();
219   QString langue = resMgr->stringValue("language", "language", "en");
220   MESSAGE("langue " << langue.toStdString().c_str() );*/
221 }
222
223 //================================================
224 void HOMARDGUI::OnGUIEvent()
225 //================================================
226 {
227   MESSAGE("OnGUIEvent()")
228   setOrb();
229   const QObject* obj = sender();
230   if ( !obj || !obj->inherits( "QAction" ) )
231        return;
232   int id = actionId((QAction*)obj);
233   bool ret;
234   if ( id != -1 )
235       ret = OnGUIEvent( id );
236   MESSAGE("************** End of OnGUIEvent()");
237 }
238
239 //=======================================================================
240 // Method OnGUIEvent pour Homard
241 //=======================================================================
242 bool HOMARDGUI::OnGUIEvent (int theCommandID)
243 {
244   MESSAGE("OnGUIEvent avec theCommandID = "<<theCommandID);
245   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
246   if ( !app ) return false;
247
248   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
249   if ( !stud ) {
250     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
251     return false;
252   }
253
254   SUIT_Desktop* parent = application()->desktop();
255   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
256
257   if (!CORBA::is_nil(homardGen))
258   {
259     // Set current study
260     SalomeApp_Study* aSAStudy =dynamic_cast<SalomeApp_Study*>(app->activeStudy());
261     _PTR(Study) aStudy = aSAStudy->studyDS();
262     SALOMEDS::Study_ptr aStudyDS;
263     if (aStudy)
264       aStudyDS = _CAST(Study,aStudy)->GetStudy();
265       homardGen->SetCurrentStudy(aStudyDS);
266    }
267   getApp()->updateObjectBrowser();
268
269
270   SCRUTE(theCommandID);
271   switch (theCommandID)
272   {
273     case 1101: // Creation d un Cas
274     {
275       MESSAGE("command " << theCommandID << " activated");
276       MonCreateCase *aDlg = new MonCreateCase( true,
277                             HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
278       aDlg->show();
279       break;
280     }
281
282     case 1102: // Poursuite d une iteration
283     {
284       MESSAGE("command " << theCommandID << " activated");
285       MonPursueIteration *aDlg = new MonPursueIteration( parent, true,
286                                 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
287       aDlg->show();
288       break;
289     }
290
291     case 1103: // Creation d une Iteration
292     {
293       MESSAGE("command " << theCommandID << " activated");
294       QString IterParentName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
295       MESSAGE("IterParentName " << IterParentName.toStdString().c_str() << " choisi dans arbre");
296       MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
297                                      HOMARD::HOMARD_Gen::_duplicate(homardGen), IterParentName ) ;
298       IterDlg->show();
299       break;
300     }
301
302     case 1111: // Compute une Iteration
303     {
304       MESSAGE("command " << theCommandID << " activated");
305       QString monIter=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 1);
306       if (monIter == QString("")) break;
307       try
308       {
309         homardGen->Compute(monIter.toStdString().c_str(), 0, 1, -1, 2);
310       }
311       catch( SALOME::SALOME_Exception& S_ex )
312       {
313         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
314                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
315         getApp()->updateObjectBrowser();
316         return false;
317       }
318       break;
319     }
320
321     case 1121: // Information sur le maillage de l'iteration
322     {
323       MESSAGE("command " << theCommandID << " activated");
324       QString IterName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
325       MESSAGE("IterName " << IterName.toStdString().c_str() << " choisi dans arbre");
326       MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), IterName ) ;
327       IterDlg->show();
328       break;
329     }
330
331     case 1201: // Edition d'un objet
332     {
333       MESSAGE("command " << theCommandID << " activated");
334       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
335       if (nomObjet == QString("")) break;
336       _PTR(SObject) obj = chercheMonObjet();
337       if (obj)
338       {
339         // Edition d'une frontiere discrete
340         if (HOMARD_UTILS::isBoundaryDi(obj))
341         {
342           MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
343           aDlg->show();
344         }
345         // Edition d'une frontiere analytique
346         else if (HOMARD_UTILS::isBoundaryAn(obj))
347         {
348           MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
349           aDlg->show();
350         }
351         // Edition d'un cas
352         else if (HOMARD_UTILS::isCase(obj))
353         {
354           MonEditCase *aDlg = new MonEditCase(true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
355           aDlg->show();
356         }
357         // Edition d'une hypothese
358         else if (HOMARD_UTILS::isHypo(obj))
359         {
360           MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
361           aDlg->show();
362         }
363         // Edition d'une iteration
364         else if (HOMARD_UTILS::isIter(obj))
365         {
366           MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
367           aDlg->show();
368         }
369         // Edition d'un schema YACS
370         else if (HOMARD_UTILS::isYACS(obj))
371         {
372           MonEditYACS *aDlg = new MonEditYACS(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName) ;
373           aDlg->show();
374         }
375         // Edition d'une zone
376         else if (HOMARD_UTILS::isZone(obj))
377         {
378           MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
379           aDlg->show();
380         }
381       }
382       break;
383     }
384
385     case 1211: // Suppression d'un objet
386     {
387       MESSAGE("command " << theCommandID << " activated");
388       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
389       if (nomObjet == QString("")) break;
390       _PTR(SObject) obj = chercheMonObjet();
391       if (obj)
392       {
393         // Suppression d'un cas
394         if (HOMARD_UTILS::isCase(obj))
395         {
396           try
397           { homardGen->DeleteCase(_ObjectName.toStdString().c_str(), 1); }
398           catch( SALOME::SALOME_Exception& S_ex )
399           {
400             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
401                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
402             getApp()->updateObjectBrowser();
403             return false;
404           }
405         }
406         // Suppression d'une iteration
407         else if (HOMARD_UTILS::isIter(obj))
408         {
409           try
410           { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
411           catch( SALOME::SALOME_Exception& S_ex )
412           {
413             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
414                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
415             getApp()->updateObjectBrowser();
416             return false;
417           }
418         }
419         // Suppression d'une hypothese
420         else if (HOMARD_UTILS::isHypo(obj))
421         {
422           try
423           { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
424           catch( SALOME::SALOME_Exception& S_ex )
425           {
426             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
427                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
428             getApp()->updateObjectBrowser();
429             return false;
430           }
431         }
432         // Suppression d'une zone
433         else if (HOMARD_UTILS::isZone(obj))
434         {
435           try
436           { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
437           catch( SALOME::SALOME_Exception& S_ex )
438           {
439             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
440                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
441             getApp()->updateObjectBrowser();
442             return false;
443           }
444         }
445         // Suppression d'une frontiere
446         else if ( HOMARD_UTILS::isBoundaryDi(obj) or HOMARD_UTILS::isBoundaryAn(obj) )
447         {
448           try
449           { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
450           catch( SALOME::SALOME_Exception& S_ex )
451           {
452             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
453                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
454             getApp()->updateObjectBrowser();
455             return false;
456           }
457         }
458       }
459       break;
460     }
461
462     case 1301: // Information sur un maillage
463     {
464       MESSAGE("etape 1301")
465       MESSAGE("command " << theCommandID << " activated");
466       MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
467       aDlg->show();
468       break;
469     }
470
471     case 1302: // Affichage du fichier mess
472     {
473       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
474       _PTR(SObject) obj = chercheMonObjet();
475       if ((obj) and ((HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj))))
476       {
477           MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
478           if ( aDlg->_codret == 0 ) { aDlg->show(); }
479       }
480       break;
481     }
482
483     case 1401: // Création d'un schéma YACS
484     {
485       MESSAGE("etape 1401")
486       MESSAGE("command " << theCommandID << " activated");
487       QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("CasHomard"), 1);
488       MESSAGE("Name " << Name.toStdString().c_str() << " choisi dans arbre");
489       MonCreateYACS *aDlg = new MonCreateYACS( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), Name ) ;
490       aDlg->show();
491       break;
492     }
493
494     case 1402: // Ecriture d'un schéma YACS
495     {
496       MESSAGE("etape 1402")
497       MESSAGE("command " << theCommandID << " activated");
498       QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("YACSHomard"), 1);
499       MESSAGE("YACSHomard " << Name.toStdString().c_str() << " choisi dans arbre");
500       MonCreateYACS *aDlg = new MonCreateYACS( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), Name ) ;
501       aDlg->show();
502       break;
503     }
504
505   }
506   getApp()->updateObjectBrowser();
507   return true;
508 }
509
510 //=============================================================================
511 /*!
512  *
513  */
514 //=============================================================================
515
516 // Module's engine IOR
517 //=============================================================================
518 QString HOMARDGUI::engineIOR() const
519 //=============================================================================
520 {
521   CORBA::String_var anIOR = getApp()->orb()->object_to_string( InitHOMARDGen(getApp()) );
522   return QString( anIOR.in() );
523 }
524
525 // Module's activation
526 //=============================================================================
527 bool HOMARDGUI::activateModule( SUIT_Study* theStudy )
528 //=============================================================================
529 {
530   bool bOk = SalomeApp_Module::activateModule( theStudy );
531
532   setMenuShown( true );
533   setToolShown( true );
534
535   return bOk;
536 }
537
538 // Module's deactivation
539 //=============================================================================
540 bool HOMARDGUI::deactivateModule( SUIT_Study* theStudy )
541 //=============================================================================
542 {
543   setMenuShown( false );
544   setToolShown( false );
545
546   return SalomeApp_Module::deactivateModule( theStudy );
547 }
548
549 // Default windows
550 //=============================================================================
551 void HOMARDGUI::windows( QMap<int, int>& theMap ) const
552 //=============================================================================
553 {
554   theMap.clear();
555   theMap.insert( SalomeApp_Application::WT_ObjectBrowser, Qt::LeftDockWidgetArea );
556   theMap.insert( SalomeApp_Application::WT_PyConsole,     Qt::BottomDockWidgetArea );
557 }
558
559 //=============================================================================
560 void HOMARDGUI::setOrb()
561 //=============================================================================
562 {
563   try
564   {
565      ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
566      ASSERT(SINGLETON_<ORB_INIT>::IsAlreadyExisting());
567      _orb = init( 0 , 0 );
568   }
569   catch (...)
570   {
571      INFOS("internal error : orb not found");
572      _orb = 0;
573   }
574             ASSERT(! CORBA::is_nil(_orb));
575 }
576 //========================================
577 _PTR(SObject) HOMARDGUI::chercheMonObjet()
578 //========================================
579 {
580   SALOMEDSClient_SObject* aSO = NULL;
581   _PTR(SObject) obj;
582   SALOME_ListIO lst;
583   getApp()->selectionMgr()->selectedObjects( lst );
584   if (  lst.Extent() == 1 )
585   {
586     Handle(SALOME_InteractiveObject) io = lst.First();
587     SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
588     _PTR(Study) study = appStudy->studyDS();
589     _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
590     _ObjectName = QString( obj->GetName().c_str() );
591     return obj;
592   }
593   else { return _PTR(SObject)(aSO); }
594 }
595 //=============================================================================
596 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
597 //=============================================================================
598 {
599   MESSAGE("Debut de contextMenuPopup");
600   _PTR(SObject) obj = chercheMonObjet();
601   if ( obj )
602   {
603     title = QString( obj->GetName().c_str() );
604     _ObjectName = title;
605     SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
606 //
607     QPixmap pix ;
608     bool DeleteObject = false ;
609     bool EditObject = false ;
610 //
611     if ( HOMARD_UTILS::isBoundaryAn(obj) )
612     {
613       EditObject = true ;
614       DeleteObject = true ;
615     }
616     else if ( HOMARD_UTILS::isBoundaryDi(obj) )
617     {
618       EditObject = true ;
619       DeleteObject = true ;
620     }
621     else if ( HOMARD_UTILS::isCase(obj) )
622     {
623       pix = resMgr->loadPixmap( "HOMARD", "table_view.png" );
624       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSCreate()));
625       EditObject = true ;
626       DeleteObject = true ;
627     }
628     else if ( HOMARD_UTILS::isHypo(obj) )
629     {
630       EditObject = true ;
631       DeleteObject = true ;
632     }
633     else if ( HOMARD_UTILS::isIter(obj) )
634     {
635       pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
636       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this, SLOT(NextIter()));
637       QPixmap pix2 = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
638       menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul()));
639       pix2 = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
640       menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
641       EditObject = true ;
642       DeleteObject = true ;
643     }
644     else if ( HOMARD_UTILS::isYACS(obj) )
645     {
646       pix = resMgr->loadPixmap( "HOMARD", "save.png" );
647       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSWrite()));
648       EditObject = true ;
649       DeleteObject = true ;
650     }
651     else if ( HOMARD_UTILS::isZone(obj) )
652     {
653       EditObject = true ;
654       DeleteObject = true ;
655     }
656     else if ( HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj) )
657     {
658       pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
659       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this, SLOT(EditAsciiFile()));
660     }
661 //  Ajout d'un menu d'edition pour les objets qui le proposent
662     if ( EditObject )
663     {
664       pix = resMgr->loadPixmap( "HOMARD", "loop.png" );
665       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this, SLOT(Edit()));
666     }
667 //  Ajout d'un menu de destruction pour les objets qui le proposent
668     if ( DeleteObject )
669     {
670       pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
671       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this, SLOT(Delete()));
672     }
673   }
674 }
675
676 void HOMARDGUI::NextIter()
677 {
678   this->OnGUIEvent(1103);
679 }
680
681 void HOMARDGUI::LanceCalcul()
682 {
683   this->OnGUIEvent(1111);
684 }
685
686 void HOMARDGUI::IterInfo()
687 {
688   this->OnGUIEvent(1121);
689 }
690
691 void HOMARDGUI::Edit()
692 {
693   this->OnGUIEvent(1201);
694 }
695
696 void HOMARDGUI::Delete()
697 {
698   this->OnGUIEvent(1211);
699 }
700
701 // void HOMARDGUI::EditAsciiFile()
702 // {
703 //   this->OnGUIEvent(1301);
704 // }
705
706 void HOMARDGUI::EditAsciiFile()
707 {
708   this->OnGUIEvent(1302);
709 }
710
711 void HOMARDGUI::YACSCreate()
712 {
713   this->OnGUIEvent(1401);
714 }
715 void HOMARDGUI::YACSWrite()
716 {
717   this->OnGUIEvent(1402);
718 }
719
720
721 //
722 //=============================================================================
723 // Export the module
724 //=============================================================================
725 extern "C" {
726   Standard_EXPORT CAM_Module* createModule()
727   {
728     return new HOMARDGUI("");
729   }
730 }
731