1 // Copyright (C) 2011-2013 CEA/DEN, EDF R&D
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.
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.
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
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
20 // File : HOMARDGUI.cxx
21 // Author : Paul RASCLE, EDF
25 #include "HOMARDGUI.h"
28 #include "Utils_ORB_INIT.hxx"
29 #include "Utils_SINGLETON.hxx"
30 #include "SALOME_LifeCycleCORBA.hxx"
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>
39 #include "CAM_Module.h"
40 #include "OB_Browser.h"
42 #include "SALOME_ListIO.hxx"
43 #include "SALOME_ListIteratorOfListIO.hxx"
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>
55 #include <utilities.h>
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 "MonCreateYACS.h"
72 #include "MonIterInfo.h"
73 #include "HomardQtCommun.h"
76 #include <boost/shared_ptr.hpp>
79 #include "SALOMEDS_Study.hxx"
80 #include "HOMARDGUI_Utils.h"
82 static CORBA::ORB_var _orb;
84 //=======================================================================
85 // function : HOMARDGUI()
86 // purpose : Constructor
87 //=======================================================================
88 HOMARDGUI::HOMARDGUI(const QString&) :
89 SalomeApp_Module( "HOMARD" ) // default name
94 //=======================================================================
95 // function : ~HOMARDGUI()
96 // purpose : Destructor
97 //=======================================================================
98 HOMARDGUI::~HOMARDGUI()
102 //=======================================================================
103 // function : InitHOMARDGen
104 // launch HOMARD component and return a handle
105 //=======================================================================
106 HOMARD::HOMARD_Gen_var HOMARDGUI::InitHOMARDGen(SalomeApp_Application* app)
108 Engines::EngineComponent_var comp = app->lcc()->FindOrLoad_Component( "FactoryServer","HOMARD" );
109 HOMARD::HOMARD_Gen_var clr = HOMARD::HOMARD_Gen::_narrow(comp);
110 ASSERT(!CORBA::is_nil(clr));
114 //=======================================================================
115 // Module's initialization
116 void HOMARDGUI::initialize( CAM_Application* app )
117 //=======================================================================
119 SalomeApp_Module::initialize( app );
120 InitHOMARDGen(dynamic_cast<SalomeApp_Application*>( app ));
126 //================================================
127 // function : createHOMARDAction
128 // create an item in status bar and Homard menu
129 //================================================
130 void HOMARDGUI::createHOMARDAction( const int id, const QString& po_id, const QString& icon_id, const int key, const bool toggle )
132 // MESSAGE("createHOMARDAction");
134 QWidget* parent = application()->desktop();
135 SUIT_ResourceMgr* resMgr = application()->resourceMgr();
137 if ( icon_id.length() )
138 pix = resMgr->loadPixmap( "HOMARD", tr( icon_id .toLatin1().data()) );
140 pix = resMgr->loadPixmap( "HOMARD", tr( QString( "ICO_%1" ).arg( po_id ).toLatin1().data()), false );
144 QString tooltip = tr(QString( "HOM_TOP_%1" ).arg( po_id ).toLatin1().data()),
145 menu = tr(QString( "HOM_MEN_%1" ).arg( po_id ).toLatin1().data()),
146 status_bar = tr(QString( "HOM_STB_%1" ).arg( po_id ).toLatin1().data());
148 createAction( id, tooltip, icon, menu, status_bar, key, parent, toggle, this, SLOT( OnGUIEvent() ) );
151 //================================================
152 // function : createAction
153 // constructs Homard menu
154 // calls createHOMARDAction for each item
155 //================================================
156 void HOMARDGUI::createActions(){
158 createHOMARDAction( 1101, "NEW_CASE", "cas_calcule.png" );
159 createHOMARDAction( 1102, "PURSUE_ITERATION", "iter_poursuite.png" );
160 createHOMARDAction( 1103, "NEW_ITERATION", "iter_next.png" );
161 createHOMARDAction( 1111, "COMPUTE", "mesh_compute.png" );
162 createHOMARDAction( 1121, "MESH_INFO", "advanced_mesh_info.png" );
164 createHOMARDAction( 1201, "EDIT", "loop.png" );
165 createHOMARDAction( 1211, "DELETE", "delete.png" );
167 createHOMARDAction( 1301, "MESH_INFO", "advanced_mesh_info.png" );
168 createHOMARDAction( 1302, "EDIT_MESS_FILE", "texte.png" );
170 createHOMARDAction( 1401, "YACS", "table_view.png" );
174 //================================================
175 // function : createPreferences
176 // No preferences for Homard
178 //================================================
179 void HOMARDGUI::createPreferences(){
180 QString toto = tr( "PREF_GROUP_GENERAL" );
181 int tabId = addPreference( tr( "PREF_GROUP_GENERAL" ) );
182 int genGroup = addPreference( tr( "PREF_TAB_SETTINGS" ), tabId );
183 addPreference( tr( "PREF_TEST" ), genGroup, LightApp_Preferences::Color, "Homard", "shading_color" );
187 //================================================
188 // function : createMenus
189 // Verifier l'avant dernier nombre passe en parametre
190 //================================================
191 void HOMARDGUI::createMenus(){
192 MESSAGE("createMenus")
194 int HOMARD_Id = createMenu( tr( "HOM_MEN_HOMARD" ), -1, 5, 10 );
195 createMenu( 1101, HOMARD_Id, -1 ); //Create_Case
196 createMenu( 1102, HOMARD_Id, -1 ); //Pursue_Iteration
197 createMenu( 1103, HOMARD_Id, -1 ); //Create_Iteration
198 createMenu( 1111, HOMARD_Id, -1 ); //COMPUTE
200 HOMARD_Id = createMenu( tr( "HOM_MEN_MODIFICATION" ), -1, 5, 10 );
201 createMenu( 1201, HOMARD_Id, -1 ); //Edit
202 createMenu( 1211, HOMARD_Id, -1 ); //Delete
204 HOMARD_Id = createMenu( tr( "HOM_MEN_INFORMATION" ), -1, 5, 10 );
205 createMenu( 1301, HOMARD_Id, -1 ); //Information sur un maillage
206 createMenu( separator(), HOMARD_Id,-1);
207 createMenu( 1302, HOMARD_Id, -1 ); //EditAsciiFile pour le fichier listeStd ou bilan
208 createMenu( separator(), HOMARD_Id,-1);
209 createMenu( 1201, HOMARD_Id, -1 ); //Edit
210 createMenu( separator(), HOMARD_Id,-1);
212 HOMARD_Id = createMenu( tr( "HOM_MEN_YACS" ), -1, 5, 10 );
213 createMenu( 1401, HOMARD_Id, -1 ); // Création d'un schéma YACS
214 createMenu( separator(), HOMARD_Id,-1);
216 /*// La langue des preferences
217 SUIT_ResourceMgr* resMgr = getApp()->resourceMgr();
218 QString langue = resMgr->stringValue("language", "language", "en");
219 MESSAGE("langue " << langue.toStdString().c_str() );*/
222 //================================================
223 void HOMARDGUI::OnGUIEvent()
224 //================================================
226 MESSAGE("OnGUIEvent()")
228 const QObject* obj = sender();
229 if ( !obj || !obj->inherits( "QAction" ) )
231 int id = actionId((QAction*)obj);
234 ret = OnGUIEvent( id );
235 MESSAGE("************** End of OnGUIEvent()");
238 //=======================================================================
239 // Method OnGUIEvent pour Homard
240 //=======================================================================
241 bool HOMARDGUI::OnGUIEvent (int theCommandID)
243 MESSAGE("OnGUIEvent avec theCommandID = "<<theCommandID);
244 SalomeApp_Application* app = dynamic_cast< SalomeApp_Application* >( application() );
245 if ( !app ) return false;
247 SalomeApp_Study* stud = dynamic_cast<SalomeApp_Study*> ( app->activeStudy() );
249 MESSAGE ( "FAILED to cast active study to SalomeApp_Study" );
253 SUIT_Desktop* parent = application()->desktop();
254 HOMARD::HOMARD_Gen_var homardGen = HOMARDGUI::InitHOMARDGen(app);
256 if (!CORBA::is_nil(homardGen))
259 SalomeApp_Study* aSAStudy =dynamic_cast<SalomeApp_Study*>(app->activeStudy());
260 _PTR(Study) aStudy = aSAStudy->studyDS();
261 SALOMEDS::Study_ptr aStudyDS;
263 aStudyDS = _CAST(Study,aStudy)->GetStudy();
264 homardGen->SetCurrentStudy(aStudyDS);
266 getApp()->updateObjectBrowser();
269 SCRUTE(theCommandID);
270 switch (theCommandID)
272 case 1101: // Creation d un Cas
274 MESSAGE("command " << theCommandID << " activated");
275 MonCreateCase *aDlg = new MonCreateCase( parent, true,
276 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
281 case 1102: // Poursuite d une iteration
283 MESSAGE("command " << theCommandID << " activated");
284 MonPursueIteration *aDlg = new MonPursueIteration( parent, true,
285 HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
290 case 1103: // Creation d une Iteration
292 MESSAGE("command " << theCommandID << " activated");
293 QString IterParentName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
294 MESSAGE("IterParentName " << IterParentName.toStdString().c_str() << " choisi dans arbre");
295 MonCreateIteration *IterDlg = new MonCreateIteration( parent, true,
296 HOMARD::HOMARD_Gen::_duplicate(homardGen), IterParentName ) ;
301 case 1111: // Compute une Iteration
303 MESSAGE("command " << theCommandID << " activated");
304 QString monIter=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 1);
305 if (monIter == QString("")) break;
308 homardGen->Compute(monIter.toStdString().c_str(), 0, 1, -1, 2);
310 catch( SALOME::SALOME_Exception& S_ex )
312 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
313 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
314 getApp()->updateObjectBrowser();
320 case 1121: // Information sur le maillage de l'iteration
322 MESSAGE("command " << theCommandID << " activated");
323 QString IterName=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("IterationHomard"), 0);
324 MESSAGE("IterName " << IterName.toStdString().c_str() << " choisi dans arbre");
325 MonIterInfo *IterDlg = new MonIterInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), IterName ) ;
330 case 1201: // Edition d'un objet
332 MESSAGE("command " << theCommandID << " activated");
333 QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
334 if (nomObjet == QString("")) break;
335 _PTR(SObject) obj = chercheMonObjet();
339 if (HOMARD_UTILS::isCase(obj))
341 MonEditCase *aDlg = new MonEditCase(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
344 // Edition d'une iteration
345 else if (HOMARD_UTILS::isIter(obj))
347 MonEditIteration *aDlg = new MonEditIteration(parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
350 // Edition d'une hypothese
351 else if (HOMARD_UTILS::isHypo(obj))
353 MonEditHypothesis *aDlg = new MonEditHypothesis(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName, QString(""), QString("")) ;
356 // Edition d'une zone
357 else if (HOMARD_UTILS::isZone(obj))
359 MonEditZone *aDlg = new MonEditZone(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
362 // Edition d'une frontiere discrete
363 else if (HOMARD_UTILS::isBoundaryDi(obj))
365 MESSAGE(".. Lancement de MonEditBoundaryDi" );
366 MonEditBoundaryDi *aDlg = new MonEditBoundaryDi(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
369 // Edition d'une frontiere analytique
370 else if (HOMARD_UTILS::isBoundaryAn(obj))
372 MESSAGE(".. Lancement de MonEditBoundaryAn" );
373 MonEditBoundaryAn *aDlg = new MonEditBoundaryAn(0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), QString(""), _ObjectName ) ;
380 case 1211: // Suppression d'un objet
382 MESSAGE("command " << theCommandID << " activated");
383 QString nomObjet = HOMARD_QT_COMMUN::SelectionArbreEtude(QString(""), 1);
384 if (nomObjet == QString("")) break;
385 _PTR(SObject) obj = chercheMonObjet();
388 // Suppression d'un cas
389 if (HOMARD_UTILS::isCase(obj))
392 { homardGen->DeleteCase(_ObjectName.toStdString().c_str(), 1); }
393 catch( SALOME::SALOME_Exception& S_ex )
395 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
396 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
397 getApp()->updateObjectBrowser();
401 // Suppression d'une iteration
402 else if (HOMARD_UTILS::isIter(obj))
405 { homardGen->DeleteIteration(_ObjectName.toStdString().c_str(), 1); }
406 catch( SALOME::SALOME_Exception& S_ex )
408 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
409 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
410 getApp()->updateObjectBrowser();
414 // Suppression d'une hypothese
415 else if (HOMARD_UTILS::isHypo(obj))
418 { homardGen->DeleteHypo(_ObjectName.toStdString().c_str()); }
419 catch( SALOME::SALOME_Exception& S_ex )
421 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
422 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
423 getApp()->updateObjectBrowser();
427 // Suppression d'une zone
428 else if (HOMARD_UTILS::isZone(obj))
431 { homardGen->DeleteZone(_ObjectName.toStdString().c_str()); }
432 catch( SALOME::SALOME_Exception& S_ex )
434 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
435 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
436 getApp()->updateObjectBrowser();
440 // Suppression d'une frontiere
441 else if ( HOMARD_UTILS::isBoundaryDi(obj) or HOMARD_UTILS::isBoundaryAn(obj) )
444 { homardGen->DeleteBoundary(_ObjectName.toStdString().c_str()); }
445 catch( SALOME::SALOME_Exception& S_ex )
447 QMessageBox::critical( 0, QObject::tr("HOM_ERROR"),
448 QObject::tr(CORBA::string_dup(S_ex.details.text)) );
449 getApp()->updateObjectBrowser();
457 case 1301: // Information sur un maillage
459 MESSAGE("etape 1301")
460 MESSAGE("command " << theCommandID << " activated");
461 MonMeshInfo *aDlg = new MonMeshInfo( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen) ) ;
466 case 1302: // Affichage du fichier mess
468 MESSAGE("command " << theCommandID << " activated avec objet " << _ObjectName.toStdString().c_str() );
469 _PTR(SObject) obj = chercheMonObjet();
470 if ((obj) and ((HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj))))
472 MonEditFile *aDlg = new MonEditFile( 0, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), _ObjectName ) ;
473 if ( aDlg->_codret == 0 ) { aDlg->show(); }
478 case 1401: // Création d'un schéma YACS
480 MESSAGE("etape 1401")
481 MESSAGE("command " << theCommandID << " activated");
482 QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("CasHomard"), 1);
483 MESSAGE("Name " << Name.toStdString().c_str() << " choisi dans arbre");
484 MonCreateYACS *aDlg = new MonCreateYACS( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), Name ) ;
489 case 1402: // Ecriture d'un schéma YACS
491 MESSAGE("etape 1402")
492 MESSAGE("command " << theCommandID << " activated");
493 QString Name=HOMARD_QT_COMMUN::SelectionArbreEtude(QString("YACSHomard"), 1);
494 MESSAGE("YACSHomard " << Name.toStdString().c_str() << " choisi dans arbre");
495 MonCreateYACS *aDlg = new MonCreateYACS( parent, true, HOMARD::HOMARD_Gen::_duplicate(homardGen), Name ) ;
501 getApp()->updateObjectBrowser();
505 //=============================================================================
509 //=============================================================================
511 // Module's engine IOR
512 //=============================================================================
513 QString HOMARDGUI::engineIOR() const
514 //=============================================================================
516 CORBA::String_var anIOR = getApp()->orb()->object_to_string( InitHOMARDGen(getApp()) );
517 return QString( anIOR.in() );
520 // Module's activation
521 //=============================================================================
522 bool HOMARDGUI::activateModule( SUIT_Study* theStudy )
523 //=============================================================================
525 bool bOk = SalomeApp_Module::activateModule( theStudy );
527 setMenuShown( true );
528 setToolShown( true );
533 // Module's deactivation
534 //=============================================================================
535 bool HOMARDGUI::deactivateModule( SUIT_Study* theStudy )
536 //=============================================================================
538 setMenuShown( false );
539 setToolShown( false );
541 return SalomeApp_Module::deactivateModule( theStudy );
545 //=============================================================================
546 void HOMARDGUI::windows( QMap<int, int>& theMap ) const
547 //=============================================================================
550 theMap.insert( SalomeApp_Application::WT_ObjectBrowser, Qt::LeftDockWidgetArea );
551 theMap.insert( SalomeApp_Application::WT_PyConsole, Qt::BottomDockWidgetArea );
554 //=============================================================================
555 void HOMARDGUI::setOrb()
556 //=============================================================================
560 ORB_INIT &init = *SINGLETON_<ORB_INIT>::Instance();
561 ASSERT(SINGLETON_<ORB_INIT>::IsAlreadyExisting());
562 _orb = init( 0 , 0 );
566 INFOS("internal error : orb not found");
569 ASSERT(! CORBA::is_nil(_orb));
571 //========================================
572 _PTR(SObject) HOMARDGUI::chercheMonObjet()
573 //========================================
575 SALOMEDSClient_SObject* aSO = NULL;
578 getApp()->selectionMgr()->selectedObjects( lst );
579 if ( lst.Extent() == 1 )
581 Handle(SALOME_InteractiveObject) io = lst.First();
582 SalomeApp_Study* appStudy = dynamic_cast<SalomeApp_Study*>( application()->activeStudy() );
583 _PTR(Study) study = appStudy->studyDS();
584 _PTR(SObject) obj = study->FindObjectID( io->getEntry() );
585 _ObjectName = QString( obj->GetName().c_str() );
588 else { return _PTR(SObject)(aSO); }
590 //=============================================================================
591 void HOMARDGUI::contextMenuPopup( const QString& client, QMenu* menu, QString& title )
592 //=============================================================================
594 MESSAGE("Debut de contextMenuPopup");
595 _PTR(SObject) obj = chercheMonObjet();
598 title = QString( obj->GetName().c_str() );
600 SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
603 bool DeleteObject = false ;
604 bool EditObject = false ;
606 if ( HOMARD_UTILS::isBoundaryAn(obj) )
609 DeleteObject = true ;
611 else if ( HOMARD_UTILS::isBoundaryDi(obj) )
614 DeleteObject = true ;
616 else if ( HOMARD_UTILS::isCase(obj) )
618 pix = resMgr->loadPixmap( "HOMARD", "table_view.png" );
619 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSCreate()));
621 DeleteObject = true ;
623 else if ( HOMARD_UTILS::isHypo(obj) )
626 DeleteObject = true ;
628 else if ( HOMARD_UTILS::isIter(obj) )
630 pix = resMgr->loadPixmap( "HOMARD", "iter_next.png" );
631 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_NEW_ITERATION").toLatin1().data()), this, SLOT(NextIter()));
632 QPixmap pix2 = resMgr->loadPixmap( "HOMARD", "mesh_compute.png" );
633 menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_COMPUTE").toLatin1().data()), this, SLOT(LanceCalcul()));
634 pix2 = resMgr->loadPixmap( "HOMARD", "advanced_mesh_info.png" );
635 menu->addAction(QIcon(pix2), tr(QString("HOM_MEN_MESH_INFO").toLatin1().data()), this, SLOT(IterInfo()));
637 DeleteObject = true ;
639 else if ( HOMARD_UTILS::isYACS(obj) )
641 pix = resMgr->loadPixmap( "HOMARD", "save.png" );
642 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_YACS").toLatin1().data()), this, SLOT(YACSWrite()));
644 DeleteObject = true ;
646 else if ( HOMARD_UTILS::isZone(obj) )
649 DeleteObject = true ;
651 else if ( HOMARD_UTILS::isFilelog(obj) or HOMARD_UTILS::isFileSummary(obj) )
653 pix = resMgr->loadPixmap( "HOMARD", "texte.png" );
654 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT_MESS_FILE").toLatin1().data()), this, SLOT(EditAsciiFile()));
656 // Ajout d'un menu d'edition pour les objets qui le proposent
659 pix = resMgr->loadPixmap( "HOMARD", "loop.png" );
660 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_EDIT").toLatin1().data()), this, SLOT(Edit()));
662 // Ajout d'un menu de destruction pour les objets qui le proposent
665 pix = resMgr->loadPixmap( "HOMARD", "delete.png" );
666 menu->addAction(QIcon(pix), tr(QString("HOM_MEN_DELETE").toLatin1().data()), this, SLOT(Delete()));
671 void HOMARDGUI::NextIter()
673 this->OnGUIEvent(1103);
676 void HOMARDGUI::LanceCalcul()
678 this->OnGUIEvent(1111);
681 void HOMARDGUI::IterInfo()
683 this->OnGUIEvent(1121);
686 void HOMARDGUI::Edit()
688 this->OnGUIEvent(1201);
691 void HOMARDGUI::Delete()
693 this->OnGUIEvent(1211);
696 // void HOMARDGUI::EditAsciiFile()
698 // this->OnGUIEvent(1301);
701 void HOMARDGUI::EditAsciiFile()
703 this->OnGUIEvent(1302);
706 void HOMARDGUI::YACSCreate()
708 this->OnGUIEvent(1401);
710 void HOMARDGUI::YACSWrite()
712 this->OnGUIEvent(1402);
717 //=============================================================================
719 //=============================================================================
721 Standard_EXPORT CAM_Module* createModule()
723 return new HOMARDGUI("");