Salome HOME
mise a jour pour la poursuite d'iterations
[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 "MonEditFile.h"
64 #include "MonEditCase.h"
65 #include "MonEditIteration.h"
66 #include "MonEditHypothesis.h"
67 #include "MonEditZone.h"
68 #include "MonEditBoundaryAn.h"
69 #include "MonEditBoundaryDi.h"
70 #include "MonMeshInfo.h"
71 #include "MonIterInfo.h"
72 #include "HomardQtCommun.h"
73
74 // BOOST Includes
75 #include <boost/shared_ptr.hpp>
76
77 //Pour le _CAST
78 #include "SALOMEDS_Study.hxx"
79 #include "HOMARDGUI_Utils.h"
80
81 static CORBA::ORB_var _orb;
82
83 //=======================================================================
84 // function : HOMARDGUI()
85 // purpose  : Constructor
86 //=======================================================================
87 HOMARDGUI::HOMARDGUI(const QString&) :
88            SalomeApp_Module( "HOMARD" ) // default name
89 {
90 }
91
92
93 //=======================================================================
94 // function : ~HOMARDGUI()
95 // purpose  : Destructor
96 //=======================================================================
97 HOMARDGUI::~HOMARDGUI()
98 {
99 }
100
101 //=======================================================================
102 // function : InitHOMARDGen
103 // launch HOMARD component and return a handle
104 //=======================================================================
105 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
106 {
107   Engines::EngineComponent_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
108   HOMARD::HOMARD_Gen_var clr = HOMARD::HOMARD_Gen::_narrow(comp);
109   ASSERT(!CORBA::is_nil(clr));
110   return clr;
111 }
112
113 //=======================================================================
114 // Module's initialization
115 void HOMARDGUI::initialize( CAM_Application* app )
116 //=======================================================================
117 {
118   SalomeApp_Module::initialize( app );
119   InitHOMARDGen(dynamic_cast<SalomeApp_Application*>( app ));
120   anId = 0;
121   createActions();
122   createMenus();
123 }
124
125 //================================================
126 // function : createHOMARDAction
127 // create an item in status bar and Homard menu
128 //================================================
129 void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QString& icon_id, const int key, const bool toggle  )
130 {
131 //   MESSAGE("createHOMARDAction");
132   QIcon icon;
133   QWidget* parent = application()->desktop();
134   SUIT_ResourceMgr* resMgr = application()->resourceMgr();
135   QPixmap pix;
136   if ( icon_id.length() )
137      pix = resMgr->loadPixmap( "HOMARD", tr( icon_id .toLatin1().data()) );
138   else
139      pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data()), false );
140   if ( !pix.isNull() )
141       icon = QIcon( pix );
142
143   QString tooltip    = tr(QString( "HOM_TOP_%1" ).arg( po_id ).toLatin1().data()),
144           menu       = tr(QString( "HOM_MEN_%1" ).arg( po_id ).toLatin1().data()),
145           status_bar = tr(QString( "HOM_STB_%1" ).arg( po_id ).toLatin1().data());
146
147   createAction( id, tooltip, icon, menu, status_bar, key, parent, toggle, this, SLOT( OnGUIEvent() )  );
148 }
149
150 //================================================
151 // function : createAction
152 // constructs Homard menu
153 // calls createHOMARDAction for each item
154 //================================================
155 void HOMARDGUI::createActions(){
156 //
157   createHOMARDAction( 1101, "NEW_CASE",         "cas_calcule.png"        );
158   createHOMARDAction( 1102, "PURSUE_ITERATION", "iter_poursuite.png"     );
159   createHOMARDAction( 1103, "NEW_ITERATION",    "iter_next.png"          );
160   createHOMARDAction( 1111, "COMPUTE",          "mesh_compute.png"       );
161   createHOMARDAction( 1121, "MESH_INFO",        "advanced_mesh_info.png" );
162 //
163   createHOMARDAction( 1201, "EDIT",             "whatis.png"       );
164   createHOMARDAction( 1211, "DELETE",           "delete.png"       );
165 //
166   createHOMARDAction( 1301, "MESH_INFO",        "advanced_mesh_info.png" );
167   createHOMARDAction( 1302, "EDIT_MESS_FILE",   "texte.png"              );
168 //
169 }
170
171 //================================================
172 // function : createPreferences
173 // No preferences for Homard
174 // Just a test
175 //================================================
176 void HOMARDGUI::createPreferences(){
177    QString toto = tr( "PREF_GROUP_GENERAL" );
178    int tabId  = addPreference( tr( "PREF_GROUP_GENERAL" ) );
179    int genGroup = addPreference( tr( "PREF_TAB_SETTINGS" ), tabId );
180    addPreference( tr( "PREF_TEST" ), genGroup, LightApp_Preferences::Color, "Homard", "shading_color" );
181 }
182
183
184 //================================================
185 // function : createMenus
186 //                Verifier l'avant dernier nombre passe en parametre
187 //================================================
188 void HOMARDGUI::createMenus(){
189   MESSAGE("createMenus")
190 //
191   int HOMARD_Id  = createMenu( tr( "HOM_MEN_HOMARD" ),  -1,  5, 10 );
192   createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
193   createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
194   createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
195   createMenu( 1111, HOMARD_Id, -1 ); //COMPUTE
196 //
197   HOMARD_Id  = createMenu( tr( "HOM_MEN_MODIFICATION" ),  -1,  5, 10 );
198   createMenu( 1201, HOMARD_Id, -1 ); //Edit
199   createMenu( 1211, HOMARD_Id, -1 ); //Delete
200 //
201   HOMARD_Id  = createMenu( tr( "HOM_MEN_INFORMATION" ),  -1,  5, 10 );
202   createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
203   createMenu( separator(), HOMARD_Id,-1);
204   createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
205   createMenu( separator(), HOMARD_Id,-1);
206   createMenu( 1201, HOMARD_Id, -1 ); //Edit
207   createMenu( separator(), HOMARD_Id,-1);
208 //   createMenu( 1201, HOMARD_Id, -1 ); //Edit
209 }
210
211 //================================================
212 void HOMARDGUI::OnGUIEvent()
213 //================================================
214 {
215   MESSAGE("OnGUIEvent()")
216   setOrb();
217   const QObject* obj = sender();
218   if ( !obj || !obj->inherits( "QAction" ) )
219        return;
220   int id = actionId((QAction*)obj);
221   bool ret;
222   if ( id != -1 )
223       ret = OnGUIEvent( id );
224   MESSAGE("************** End of OnGUIEvent()");
225 }
226
227 //=======================================================================
228 // Method OnGUIEvent pour Homard
229 //=======================================================================
230 bool HOMARDGUI::OnGUIEvent (int theCommandID)
231 {
232   MESSAGE("OnGUIEvent(int)");
233   SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
234   if ( !app ) return false;
235
236   SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
237   if ( !stud ) {
238     MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
239     return false;
240   }
241
242   SUIT_Desktop* parent = application()->desktop();
243   HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
244
245   if (!CORBA::is_nil(homardGen))
246   {
247     // Set current study
248     SalomeApp_Study* aSAStudy =dynamic_cast<SalomeApp_Study*>(app->activeStudy());
249     _PTR(Study) aStudy = aSAStudy->studyDS();
250     SALOMEDS::Study_ptr aStudyDS;
251     if (aStudy)
252       aStudyDS = _CAST(Study,aStudy)->GetStudy();
253       homardGen->SetCurrentStudy(aStudyDS);
254    }
255   getApp()->updateObjectBrowser();
256
257   SCRUTE(theCommandID);
258   switch (theCommandID)
259   {
260     case 1101: // Creation d un Cas
261     {
262       MESSAGE("command " << theCommandID << " activated");
263       MonCreateCase *aDlg = new MonCreateCase( parent, true,
264                             HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
265       aDlg->show();
266       break;
267     }
268
269     case 1102: // Poursuite d une iteration
270     {
271       MESSAGE("command " << theCommandID << " activated");
272       MonPursueIteration *aDlg = new MonPursueIteration( parent, true,
273                                 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
274       aDlg->show();
275       break;
276     }
277
278     case 1103: // Creation d une Iteration
279     {
280       MESSAGE("command " << theCommandID << " activated");
281       QString IterParentName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
282       MESSAGE("IterParentName " << IterParentName.toStdString().c_str() << " choisi dans arbre");
283       MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
284                                      HOMARD::HOMARD_Gen::_duplicate(homardGen), IterParentName ) ;
285       IterDlg->show();
286       break;
287     }
288
289     case 1111: // Compute une Iteration
290     {
291       MESSAGE("command " << theCommandID << " activated");
292       QString monIter=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 1);
293       if (monIter == QString("")) break;
294       try
295       {
296         homardGen->Compute(monIter.toStdString().c_str(), 0, 1, -1, 2);
297       }
298       catch( SALOME::SALOME_Exception& S_ex )
299       {
300         QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
301                                   QObject::tr(CORBA::string_dup(S_ex.details.text)) );
302         getApp()->updateObjectBrowser();
303         return false;
304       }
305       break;
306     }
307
308     case 1121: // Information sur le maillage de l'iteration
309     {
310       MESSAGE("command " << theCommandID << " activated");
311       QString IterName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
312       MESSAGE("IterName " << IterName.toStdString().c_str() << " choisi dans arbre");
313       MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), IterName ) ;
314       IterDlg->show();
315       break;
316     }
317
318     case 1201: // Edition d'un objet
319     {
320       MESSAGE("command " << theCommandID << " activated");
321       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
322       if (nomObjet == QString("")) break;
323       _PTR(SObject) obj = chercheMonObjet();
324       if (obj)
325       {
326         // Edition d'un cas
327         if (HOMARD_UTILS::isCase(obj))
328         {
329           MonEditCase *aDlg = new MonEditCase(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
330           aDlg->show();
331         }
332         // Edition d'une iteration
333         else if (HOMARD_UTILS::isIter(obj))
334         {
335           MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
336           aDlg->show();
337         }
338         // Edition d'une hypothese
339         else if (HOMARD_UTILS::isHypo(obj))
340         {
341           MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen),  _ObjectName, QString(""), QString("")) ;
342           aDlg->show();
343         }
344         // Edition d'une zone
345         else if (HOMARD_UTILS::isZone(obj))
346         {
347           MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
348           aDlg->show();
349         }
350         // Edition d'une frontiere discrete
351         else if (HOMARD_UTILS::isBoundaryDi(obj))
352         {
353             MESSAGE(".. Lancement de MonEditBoundaryDi" );
354             MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
355             aDlg->show();
356         }
357         // Edition d'une frontiere analytique
358         else if (HOMARD_UTILS::isBoundaryAn(obj))
359         {
360             MESSAGE(".. Lancement de MonEditBoundaryAn" );
361             MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
362             aDlg->show();
363         }
364       }
365       break;
366     }
367
368     case 1211: // Suppression d'un objet
369     {
370       MESSAGE("command " << theCommandID << " activated");
371       QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
372       if (nomObjet == QString("")) break;
373       _PTR(SObject) obj = chercheMonObjet();
374       if (obj)
375       {
376         // Suppression d'un cas
377         if (HOMARD_UTILS::isCase(obj))
378         {
379           try
380           { homardGen->DeleteCase(_ObjectName.toStdString().c_str()); }
381           catch( SALOME::SALOME_Exception& S_ex )
382           {
383             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
384                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
385             getApp()->updateObjectBrowser();
386             return false;
387           }
388         }
389         // Suppression d'une iteration
390         else if (HOMARD_UTILS::isIter(obj))
391         {
392           try
393           { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
394           catch( SALOME::SALOME_Exception& S_ex )
395           {
396             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
397                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
398             getApp()->updateObjectBrowser();
399             return false;
400           }
401         }
402         // Suppression d'une hypothese
403         else if (HOMARD_UTILS::isHypo(obj))
404         {
405           try
406           { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
407           catch( SALOME::SALOME_Exception& S_ex )
408           {
409             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
410                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
411             getApp()->updateObjectBrowser();
412             return false;
413           }
414         }
415         // Suppression d'une zone
416         else if (HOMARD_UTILS::isZone(obj))
417         {
418           try
419           { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
420           catch( SALOME::SALOME_Exception& S_ex )
421           {
422             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
423                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
424             getApp()->updateObjectBrowser();
425             return false;
426           }
427         }
428         // Suppression d'une frontiere
429         else if ( HOMARD_UTILS::isBoundaryDi(obj) or HOMARD_UTILS::isBoundaryAn(obj) )
430         {
431           try
432           { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
433           catch( SALOME::SALOME_Exception& S_ex )
434           {
435             QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
436                                       QObject::tr(CORBA::string_dup(S_ex.details.text)) );
437             getApp()->updateObjectBrowser();
438             return false;
439           }
440         }
441       }
442       break;
443     }
444
445     case 1301: // Information sur un maillage
446     {
447       MESSAGE("etape 1301")
448       MESSAGE("command " << theCommandID << " activated");
449       MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
450       aDlg->show();
451       break;
452     }
453
454     case 1302: // Affichage du fichier mess
455     {
456       MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
457       _PTR(SObject) obj = chercheMonObjet();
458       if ((obj) and ((HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj))))
459       {
460           MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
461           if ( aDlg->_codret == 0 ) { aDlg->show(); }
462       }
463       break;
464      }
465
466   }
467   getApp()->updateObjectBrowser();
468   return true;
469 }
470
471 //=============================================================================
472 /*!
473  *
474  */
475 //=============================================================================
476
477 // Module's engine IOR
478 //=============================================================================
479 QString HOMARDGUI::engineIOR() const
480 //=============================================================================
481 {
482   CORBA::String_var anIOR = getApp()->orb()->object_to_string( InitHOMARDGen(getApp()) );
483   return QString( anIOR.in() );
484 }
485
486 // Module's activation
487 //=============================================================================
488 bool HOMARDGUI::activateModule( SUIT_Study* theStudy )
489 //=============================================================================
490 {
491   bool bOk = SalomeApp_Module::activateModule( theStudy );
492
493   setMenuShown( true );
494   setToolShown( true );
495
496   return bOk;
497 }
498
499 // Module's deactivation
500 //=============================================================================
501 bool HOMARDGUI::deactivateModule( SUIT_Study* theStudy )
502 //=============================================================================
503 {
504   setMenuShown( false );
505   setToolShown( false );
506
507   return SalomeApp_Module::deactivateModule( theStudy );
508 }
509
510 // Default windows
511 //=============================================================================
512 void HOMARDGUI::windows( QMap<int, int>& theMap ) const
513 //=============================================================================
514 {
515   theMap.clear();
516   theMap.insert( SalomeApp_Application::WT_ObjectBrowser, Qt::LeftDockWidgetArea );
517   theMap.insert( SalomeApp_Application::WT_PyConsole,     Qt::BottomDockWidgetArea );
518 }
519
520 //=============================================================================
521 void HOMARDGUI::setOrb()
522 //=============================================================================
523 {
524   try
525   {
526      ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
527      ASSERT(SINGLETON_<ORB_INIT>::IsAlreadyExisting());
528      _orb = init( 0 , 0 );
529   }
530   catch (...)
531   {
532      INFOS("internal error : orb not found");
533      _orb = 0;
534   }
535             ASSERT(! CORBA::is_nil(_orb));
536 }
537 //========================================
538 _PTR(SObject) HOMARDGUI::chercheMonObjet()
539 //========================================
540 {
541
542     SALOMEDSClient_SObject* aSO = NULL;
543     _PTR(SObject) obj;
544     SALOME_ListIO lst;
545     getApp()->selectionMgr()->selectedObjects( lst );
546     if (  lst.Extent() == 1 )
547     {
548         Handle(SALOME_InteractiveObject) io = lst.First();
549         SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
550         _PTR(Study) study = appStudy->studyDS();
551         _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
552         _ObjectName = QString( obj->GetName().c_str() );
553         return obj;
554      }
555      else
556          return _PTR(SObject)(aSO);
557 }
558 //=============================================================================
559 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
560 //=============================================================================
561 {
562   MESSAGE("Debut de contextMenuPopup");
563   _PTR(SObject) obj = chercheMonObjet();
564   if ( obj )
565   {
566     title = QString( obj->GetName().c_str() );
567     _ObjectName = title;
568     SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
569 //
570     QPixmap pix ;
571     bool DeleteObject = false ;
572     bool EditObject = false ;
573 //
574     if ( HOMARD_UTILS::isBoundaryAn(obj) )
575     {
576       EditObject = true ;
577       DeleteObject = true ;
578     }
579     else if ( HOMARD_UTILS::isBoundaryDi(obj) )
580     {
581       EditObject = true ;
582       DeleteObject = true ;
583     }
584     else if ( HOMARD_UTILS::isZone(obj) )
585     {
586       EditObject = true ;
587       DeleteObject = true ;
588     }
589     else if ( HOMARD_UTILS::isHypo(obj) )
590     {
591       EditObject = true ;
592       DeleteObject = true ;
593     }
594     else if ( HOMARD_UTILS::isIter(obj) )
595     {
596       pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
597       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this,SLOT(NextIter()));
598       QPixmap pix2 = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
599       menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul()));
600       pix2 = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
601       menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
602       EditObject = true ;
603       DeleteObject = true ;
604     }
605     else if ( HOMARD_UTILS::isCase(obj) )
606     {
607       EditObject = true ;
608       DeleteObject = true ;
609     }
610     else if ( HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj) )
611     {
612       pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
613       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this,SLOT(EditAsciiFile()));
614     }
615 //  Ajout d'un menu d'edition pour les objets qui le proposent
616     if ( EditObject )
617     {
618       pix = resMgr->loadPixmap( "HOMARD", "whatis.png" );
619       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this,SLOT(Edit()));
620     }
621 //  Ajout d'un menu de destruction pour les objets qui le proposent
622     if ( DeleteObject )
623     {
624       pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
625       menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this,SLOT(Delete()));
626     }
627   }
628 }
629
630 void HOMARDGUI::NextIter()
631 {
632   this->OnGUIEvent(1103);
633 }
634
635 void HOMARDGUI::LanceCalcul()
636 {
637   this->OnGUIEvent(1111);
638 }
639
640 void HOMARDGUI::IterInfo()
641 {
642   this->OnGUIEvent(1121);
643 }
644
645 void HOMARDGUI::Edit()
646 {
647   this->OnGUIEvent(1201);
648 }
649
650 void HOMARDGUI::Delete()
651 {
652   this->OnGUIEvent(1211);
653 }
654
655 // void HOMARDGUI::EditAsciiFile()
656 // {
657 //   this->OnGUIEvent(1301);
658 // }
659
660 void HOMARDGUI::EditAsciiFile()
661 {
662   this->OnGUIEvent(1302);
663 }
664
665 //
666 //=============================================================================
667 // Export the module
668 //=============================================================================
669 extern "C" {
670   Standard_EXPORT CAM_Module* createModule()
671   {
672     return new HOMARDGUI("");
673   }
674 }
675