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