1 // GEOM GEOMGUI : GUI for Geometry component
3 // Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
24 // File : RepairGUI_GlueDlg.cxx
25 // Author : Lucien PIGNOLONI
29 #include "OCCViewer_ViewModel.h"
31 #include "RepairGUI_GlueDlg.h"
32 #include "DlgRef_1Sel_Ext.h"
33 #include "GEOMImpl_Types.hxx"
35 #include "QtxDblSpinBox.h"
36 #include "SalomeApp_Application.h"
37 #include "LightApp_SelectionMgr.h"
38 #include "SalomeApp_Study.h"
39 #include "SalomeApp_Tools.h"
41 #include "SUIT_Session.h"
42 #include "SUIT_MessageBox.h"
43 #include "SUIT_OverrideCursor.h"
45 #include "SALOME_ListIteratorOfListIO.hxx"
47 #include <TCollection_AsciiString.hxx>
49 #include <qapplication.h>
51 #include <qcheckbox.h>
57 #define DEFAULT_TOLERANCE_VALUE 1e-07
59 //=================================================================================
60 // class : RepairGUI_GlueDlg()
61 // purpose : Constructs a RepairGUI_GlueDlg which is a child of 'parent', with the
62 // name 'name' and widget flags set to 'f'.
63 // The dialog will by default be modeless, unless you set 'modal' to
64 // TRUE to construct a modal dialog.
65 //=================================================================================
66 RepairGUI_GlueDlg::RepairGUI_GlueDlg(GeometryGUI* theGeometryGUI, QWidget* parent,
67 const char* name, bool modal, WFlags fl)
68 : GEOMBase_Skeleton(theGeometryGUI, parent, name, modal, WStyle_Customize |
69 WStyle_NormalBorder | WStyle_Title | WStyle_SysMenu),
72 QPixmap image0 (SUIT_Session::session()->resourceMgr()->loadPixmap("GEOM",tr("ICON_DLG_GLUE_FACES")));
73 QPixmap image2 (SUIT_Session::session()->resourceMgr()->loadPixmap("GEOM",tr("ICON_DLG_GLUE_FACES2")));
74 QPixmap image1 (SUIT_Session::session()->resourceMgr()->loadPixmap("GEOM",tr("ICON_SELECT")));
76 setCaption(tr("GEOM_GLUE_TITLE"));
78 /***************************************************************/
79 GroupConstructors->setTitle(tr("GEOM_GLUE_TITLE"));
80 RadioButton1->setPixmap(image0);
81 RadioButton2->setPixmap(image2);
82 //RadioButton2->close(TRUE);
83 RadioButton3->close(TRUE);
85 GroupPoints = new DlgRef_1Sel_Ext(this, "GroupPoints");
86 GroupPoints->GroupBox1->setTitle(tr("GEOM_GLUE"));
87 GroupPoints->TextLabel1->setText(tr("GEOM_SELECTED_SHAPE"));
88 GroupPoints->PushButton1->setPixmap(image1);
89 GroupPoints->LineEdit1->setReadOnly( true );
91 int aWidth = GroupPoints->TextLabel1->sizeHint().width() +
92 GroupPoints->PushButton1->sizeHint().width() +
93 GroupPoints->getGroupBoxLayout()->spacing();
95 Layout1->addWidget(GroupPoints, 2, 0);
97 QHBox* aHBox = new QHBox( GroupPoints->GroupBox1 );
98 aHBox->setSpacing( 5 );
100 (new QLabel( tr( "GEOM_TOLERANCE" ), aHBox ))->setFixedWidth( aWidth );
101 myTolEdt = new QtxDblSpinBox( 0, 100, 1e-7, aHBox );
102 myTolEdt->setSizePolicy( QSizePolicy( QSizePolicy::Expanding, QSizePolicy::Fixed ) );
103 myTolEdt->setPrecision( 10 );
104 myTolEdt->setValue( DEFAULT_TOLERANCE_VALUE );
105 GroupPoints->getGroupBoxLayout()->addWidget( aHBox, 3, 0 );
106 /***************************************************************/
108 GroupPoints2 = new DlgRef_1Sel_Ext(this, "GroupPoints2");
109 GroupPoints2->GroupBox1->setTitle(tr("GEOM_GLUE"));
110 GroupPoints2->TextLabel1->setText(tr("GEOM_SELECTED_SHAPE"));
111 GroupPoints2->PushButton1->setPixmap(image1);
112 GroupPoints2->LineEdit1->setReadOnly( true );
113 Layout1->addWidget(GroupPoints2, 2, 0);
115 QGrid* aGrid = new QGrid( 2, Qt::Horizontal, GroupPoints2->GroupBox1 );
116 aGrid->setSpacing( 5 );
117 (new QLabel( tr( "GEOM_TOLERANCE" ), aGrid ))->setFixedWidth( aWidth );;
118 myTolEdt2 = new QtxDblSpinBox( 0, 100, 1e-7, aGrid );
119 myTolEdt2->setPrecision( 10 );
120 myTolEdt2->setValue( DEFAULT_TOLERANCE_VALUE );
121 myTolEdt2->setSizePolicy( QSizePolicy( QSizePolicy::Expanding, QSizePolicy::Fixed ) );
122 (new QLabel( tr( "GLUE_FACES" ), aGrid ))->setFixedWidth( aWidth );;
123 myDetectBtn = new QPushButton( tr( "GEOM_DETECT" ), aGrid );
124 myDetectBtn->setSizePolicy( QSizePolicy( QSizePolicy::Expanding, QSizePolicy::Fixed ) );
125 mySubShapesChk = new QCheckBox( tr( "SELECT_FACES" ), aGrid );
126 GroupPoints2->getGroupBoxLayout()->addWidget( aGrid, 3, 0 );
127 /***************************************************************/
129 setHelpFileName("glue_faces.htm");
131 // Disable second way of gluing if OCC viewer is not active one
132 if (SUIT_Session::session()->activeApplication()->desktop()->activeWindow()->getViewManager()->getType()
133 != OCCViewer_Viewer::Type())
134 RadioButton2->setEnabled(false);
140 //=================================================================================
141 // function : ~RepairGUI_GlueDlg()
142 // purpose : Destroys the object and frees any allocated resources
143 //=================================================================================
144 RepairGUI_GlueDlg::~RepairGUI_GlueDlg()
149 //=================================================================================
152 //=================================================================================
153 void RepairGUI_GlueDlg::Init()
156 myEditCurrentArgument = GroupPoints->LineEdit1;
158 myObject = GEOM::GEOM_Object::_nil();
160 //myGeomGUI->SetState( 0 );
161 //globalSelection( GEOM_COMPOUND );
163 /* signals and slots connections */
164 connect(buttonOk, SIGNAL(clicked()), this, SLOT(ClickOnOk()));
165 connect(buttonApply, SIGNAL(clicked()), this, SLOT(ClickOnApply()));
166 connect(GroupConstructors, SIGNAL(clicked(int)), this, SLOT(ConstructorsClicked(int)));
168 connect(GroupPoints->PushButton1, SIGNAL(clicked()), this, SLOT(SetEditCurrentArgument()));
169 connect(GroupPoints->LineEdit1, SIGNAL(returnPressed()), this, SLOT(LineEditReturnPressed()));
171 connect(GroupPoints2->PushButton1, SIGNAL(clicked()), this, SLOT(SetEditCurrentArgument()));
172 connect(GroupPoints2->LineEdit1, SIGNAL(returnPressed()), this, SLOT(LineEditReturnPressed()));
173 connect( myTolEdt2, SIGNAL( valueChanged( double ) ), this, SLOT( onTolerChanged( double ) ) );
174 connect( mySubShapesChk, SIGNAL( stateChanged( int ) ), this, SLOT( onSubShapesChk() ) );
176 connect( ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
177 SIGNAL(currentSelectionChanged()), this, SLOT(SelectionIntoArgument()) );
179 connect(myDetectBtn, SIGNAL(clicked()), this, SLOT(onDetect()));
181 initName( tr( "GLUE_NEW_OBJ_NAME" ) );
183 ConstructorsClicked(0);
190 //=================================================================================
191 // function : ConstructorsClicked()
192 // purpose : Radio button management
193 //=================================================================================
194 void RepairGUI_GlueDlg::ConstructorsClicked( int constructorId )
196 if ( myCurrConstrId == constructorId )
199 disconnect(((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(), 0, this, 0);
201 switch ( constructorId )
205 GroupPoints2->hide();
208 GroupPoints->LineEdit1->setText( "" );
209 myEditCurrentArgument = GroupPoints->LineEdit1;
211 if ( myCurrConstrId >= 0 ) // i.e. it is not initialisation
213 // copy tolerance from previous tolerance field
214 myTolEdt->setValue( myTolEdt2->value() );
223 GroupPoints2->show();
224 GroupPoints->LineEdit1->setText("");
225 myEditCurrentArgument = GroupPoints2->LineEdit1;
227 if ( myCurrConstrId >= 0 ) // i.e. it is not initialisation
229 // copy tolerance from previous tolerance field
230 myTolEdt2->setValue( myTolEdt->value() );
231 mySubShapesChk->setChecked( false );
239 myCurrConstrId = constructorId;
241 myEditCurrentArgument->setFocus();
243 connect(((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
244 SIGNAL(currentSelectionChanged()), this, SLOT(SelectionIntoArgument()));
246 qApp->processEvents();
248 QSize aSize = minimumSizeHint();
249 resize( width(), aSize.height() );
254 SelectionIntoArgument();
258 //=================================================================================
259 // function : ClickOnOk()
260 // purpose : Same than click on apply but close this dialog.
261 //=================================================================================
262 void RepairGUI_GlueDlg::ClickOnOk()
264 if ( ClickOnApply() )
269 //=================================================================================
270 // function : ClickOnApply()
272 //=================================================================================
273 bool RepairGUI_GlueDlg::ClickOnApply()
275 if ( !onAcceptLocal() )
280 //GroupPoints->LineEdit1->setText("");
281 //myObject = GEOM::GEOM_Object::_nil();
283 //globalSelection( GEOM_COMPOUND );
285 ConstructorsClicked( getConstructorId() );
291 //=================================================================================
292 // function : SelectionIntoArgument()
293 // purpose : Called when selection
294 //=================================================================================
295 void RepairGUI_GlueDlg::SelectionIntoArgument()
297 if ( mySubShapesChk->isChecked() && getConstructorId() == 1 )
301 myEditCurrentArgument->setText("");
302 myObject = GEOM::GEOM_Object::_nil();
304 if ( IObjectCount() == 1 ) {
305 Handle(SALOME_InteractiveObject) anIO = firstIObject();
306 Standard_Boolean aRes;
307 myObject = GEOMBase::ConvertIOinGEOMObject( anIO, aRes );
309 myEditCurrentArgument->setText( GEOMBase::GetName( myObject ) );
314 //=================================================================================
315 // function : SetEditCurrentArgument()
317 //=================================================================================
318 void RepairGUI_GlueDlg::SetEditCurrentArgument()
320 const QObject* send = sender();
321 if ( send == GroupPoints->PushButton1 || send == GroupPoints2->PushButton1 ) {
322 myEditCurrentArgument->setFocus();
323 SelectionIntoArgument();
328 //=================================================================================
329 // function : LineEditReturnPressed()
331 //=================================================================================
332 void RepairGUI_GlueDlg::LineEditReturnPressed()
334 const QObject* send = sender();
335 if( send == GroupPoints->LineEdit1 ) {
336 myEditCurrentArgument = GroupPoints->LineEdit1;
337 GEOMBase_Skeleton::LineEditReturnPressed();
339 else if( send == GroupPoints2->LineEdit1 ) {
340 myEditCurrentArgument = GroupPoints2->LineEdit1;
341 GEOMBase_Skeleton::LineEditReturnPressed();
346 //=================================================================================
347 // function : ActivateThisDialog()
349 //=================================================================================
350 void RepairGUI_GlueDlg::ActivateThisDialog()
352 GEOMBase_Skeleton::ActivateThisDialog();
353 connect(((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
354 SIGNAL(currentSelectionChanged()), this, SLOT(SelectionIntoArgument()));
356 //GroupPoints->LineEdit1->setText("");
357 //GroupPoints2->LineEdit1->setText("");
358 //myObject = GEOM::GEOM_Object::_nil();
360 //myGeomGUI->SetState( 0 );
361 //globalSelection( GEOM_COMPOUND );
366 //=================================================================================
367 // function : enterEvent()
368 // purpose : Mouse enter onto the dialog to activate it
369 //=================================================================================
370 void RepairGUI_GlueDlg::enterEvent(QEvent* e)
372 if ( !GroupConstructors->isEnabled() )
373 ActivateThisDialog();
376 //=================================================================================
377 // function : closeEvent()
379 //=================================================================================
380 void RepairGUI_GlueDlg::closeEvent(QCloseEvent* e)
382 //myGeomGUI->SetState( -1 );
383 GEOMBase_Skeleton::closeEvent( e );
387 //=================================================================================
388 // function : createOperation
390 //=================================================================================
391 GEOM::GEOM_IOperations_ptr RepairGUI_GlueDlg::createOperation()
393 return getGeomEngine()->GetIShapesOperations( getStudyId() );
396 //=================================================================================
397 // function : isValid
399 //=================================================================================
400 bool RepairGUI_GlueDlg::isValid( QString& msg )
402 return !myObject->_is_nil() && ( IsPreview() || myTolEdt->value() > 0. );
405 //=================================================================================
406 // function : execute
408 //=================================================================================
409 bool RepairGUI_GlueDlg::execute( ObjectList& objects )
411 bool aResult = false;
414 switch ( getConstructorId() )
418 GEOM::GEOM_Object_var anObj = GEOM::GEOM_IShapesOperations::_narrow
419 ( getOperation() )->MakeGlueFaces( myObject, myTolEdt2->value(), true );
420 aResult = !anObj->_is_nil();
422 objects.push_back( anObj._retn() );
429 // if this method is used for displaying preview then we must detect glue faces only
430 ObjectList::iterator anIter;
431 for (anIter = myTmpObjs.begin(); anIter != myTmpObjs.end(); ++anIter)
432 objects.push_back( GEOM::GEOM_Object::_duplicate( *anIter ) );
433 return myTmpObjs.size() ? true : false;
436 // Make glue face by list.
437 // Iterate through myTmpObjs and verifies where each object is currently selected or not.
438 QMap<QString, char> selected;
440 // Get names of selected objects
441 SALOME_ListIteratorOfListIO it ( selectedIO() );
442 for (; it.More(); it.Next())
443 selected.insert( it.Value()->getName(), 0 );
445 // Iterate through result and select objects with names from selection
446 // ObjectList toRemoveFromEnggine;
448 ObjectList::iterator anIter;
449 for (anIter = myTmpObjs.begin(); anIter != myTmpObjs.end(); ++anIter)
451 if ( selected.contains( myGeomGUI->getApp()->orb()->object_to_string(*anIter) ) )
452 toGlue.push_back(*anIter);
456 GEOM::ListOfGO_var aListForGlue = new GEOM::ListOfGO();
457 aListForGlue->length( toGlue.size() );
458 ObjectList::iterator anIter3 = toGlue.begin();
459 for ( int i = 0; anIter3 != toGlue.end(); ++anIter3, ++i )
460 aListForGlue[ i ] = *anIter3;
461 GEOM::GEOM_Object_var anObj = GEOM::GEOM_IShapesOperations::_narrow
462 ( getOperation() )->MakeGlueFacesByList( myObject, myTolEdt2->value(), aListForGlue, true );
464 aResult = !anObj->_is_nil();
467 objects.push_back( anObj._retn() );
469 // Remove from engine useless objects
482 //================================================================
483 // Function : clearShapeBufferLocal
485 //================================================================
486 void RepairGUI_GlueDlg::clearShapeBufferLocal( GEOM::GEOM_Object_ptr theObj )
488 if ( CORBA::is_nil( theObj ) )
491 CORBA::String_var IOR = myGeomGUI->getApp()->orb()->object_to_string( theObj );
492 TCollection_AsciiString asciiIOR( (char *)( IOR.in() ) );
493 myGeomGUI->GetShapeReader().RemoveShapeFromBuffer( asciiIOR );
495 if ( !getStudy() || !( getStudy()->studyDS() ) )
498 _PTR(Study) aStudy = getStudy()->studyDS();
499 _PTR(SObject) aSObj ( aStudy->FindObjectIOR( string( IOR.in() ) ) );
503 _PTR(ChildIterator) anIt ( aStudy->NewChildIterator( aSObj ) );
504 for ( anIt->InitEx( true ); anIt->More(); anIt->Next() ) {
505 _PTR(GenericAttribute) anAttr;
506 if ( anIt->Value()->FindAttribute(anAttr, "AttributeIOR") ) {
507 _PTR(AttributeIOR) anIOR ( anAttr );
508 TCollection_AsciiString asciiIOR( (char*)anIOR->Value().c_str() );
509 myGeomGUI->GetShapeReader().RemoveShapeFromBuffer( asciiIOR );
514 //================================================================
515 // Function : onAccept
516 // Purpose : This method should be called from dialog's slots onOk() and onApply()
517 // It perfroms user input validation, then it
518 // performs a proper operation and manages transactions, etc.
519 //================================================================
520 bool RepairGUI_GlueDlg::onAcceptLocal()
522 if ( !getStudy() || !( getStudy()->studyDS() ) )
525 _PTR(Study) aStudy = getStudy()->studyDS();
527 bool aLocked = aStudy->GetProperties()->IsLocked();
530 MESSAGE("GEOMBase_Helper::onAccept - ActiveStudy is locked");
531 SUIT_MessageBox::warn1 ( (QWidget*)(SUIT_Session::session()->activeApplication()->desktop()),
532 QObject::tr("WRN_WARNING"), QObject::tr("WRN_STUDY_LOCKED"), QObject::tr("BUT_OK") );
537 if ( !isValid( msg ) )
543 erasePreview( false );
549 SUIT_OverrideCursor wc;
551 SUIT_Session::session()->activeApplication()->putInfo( "" );
554 if ( !execute( objects ) )
562 const int nbObjs = objects.size();
563 bool withChildren = false;
564 for ( ObjectList::iterator it = objects.begin(); it != objects.end(); ++it )
569 aName = strlen( getNewObjectName() ) ? GEOMBase::GetDefaultName( getNewObjectName() ) : GEOMBase::GetDefaultName( getPrefix( *it ) );
573 aName = getNewObjectName();
574 // PAL6521: use a prefix, if some dialog box doesn't reimplement getNewObjectName()
575 if ( aName.isEmpty() )
576 aName = GEOMBase::GetDefaultName( getPrefix( *it ) );
578 addInStudy( *it, aName.latin1() );
579 withChildren = false;
580 display( *it, false );
587 SUIT_Session::session()->activeApplication()->putInfo( QObject::tr("GEOM_PRP_DONE") );
594 // JFA 28.12.2004 BEGIN // To enable warnings
595 if ( !getOperation()->_is_nil() )
597 if ( !getOperation()->IsDone() )
600 QString msgw = QObject::tr( getOperation()->GetErrorCode() );
601 SUIT_MessageBox::warn1((QWidget*)(SUIT_Session::session()->activeApplication()->desktop()),
602 QObject::tr( "WRN_WARNING" ),
604 QObject::tr( "BUT_OK" ));
607 // JFA 28.12.2004 END
611 catch( const SALOME::SALOME_Exception& e )
613 SalomeApp_Tools::QtCatchCorbaException( e );
625 //=================================================================================
626 // function : onDetect
628 //=================================================================================
629 void RepairGUI_GlueDlg::onDetect()
633 if ( !isValid( msg ) ) {
638 GEOM::ListOfGO_var aList = GEOM::GEOM_IShapesOperations::_narrow
639 ( getOperation() )->GetGlueFaces( myObject, myTolEdt2->value() );
641 for (int i = 0, n = aList->length(); i < n; i++)
642 myTmpObjs.push_back(GEOM::GEOM_Object::_duplicate(aList[i]));
644 if ( myTmpObjs.size() > 0 )
646 msg = tr( "FACES_FOR_GLUING_ARE_DETECTED" ).arg( myTmpObjs.size() );
647 mySubShapesChk->setChecked( true );
651 msg = tr( "THERE_ARE_NO_FACES_FOR_GLUING" );
654 SUIT_MessageBox::info1( this, tr( "GEOM_FREE_BOUNDS_TLT" ), msg, "Close" );
659 //=================================================================================
660 // function : activateSelection
661 // purpose : Redisplay preview and Activate selection
662 //=================================================================================
663 void RepairGUI_GlueDlg::activateSelection()
667 int anId = getConstructorId();
668 if ( anId == 0 ) // Case of whole gluing
670 disconnect( ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
671 SIGNAL(currentSelectionChanged()), this, SLOT(SelectionIntoArgument()) ) ;
673 globalSelection( GEOM_ALLSHAPES );
674 if (myObject->_is_nil())
675 SelectionIntoArgument();
677 connect( ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
678 SIGNAL(currentSelectionChanged()), this, SLOT(SelectionIntoArgument()) ) ;
680 else // Second case of gluing
682 if ( !mySubShapesChk->isChecked() )
683 globalSelection( GEOM_ALLSHAPES );
686 displayPreview( true, false, false, 2/*line width*/, 1/*display mode*/, Quantity_NOC_RED );
687 globalSelection( GEOM_PREVIEW );
694 //=================================================================================
695 // function : updateButtonState
696 // purpose : Update button state
697 //=================================================================================
698 void RepairGUI_GlueDlg::updateButtonState()
700 int anId = getConstructorId();
701 bool hasMainObj = !myObject->_is_nil();
704 buttonOk->setEnabled( hasMainObj );
705 buttonApply->setEnabled( hasMainObj );
709 bool wasDetected = myTmpObjs.size() ? true : false;
710 buttonOk->setEnabled( hasMainObj && wasDetected );
711 buttonApply->setEnabled( hasMainObj && wasDetected );
712 mySubShapesChk->setEnabled( hasMainObj && wasDetected );
713 myDetectBtn->setEnabled( hasMainObj );
714 if ( !hasMainObj || !wasDetected )
715 mySubShapesChk->setChecked( false );
719 //=================================================================================
720 // function : clearTemporary
721 // purpose : Remove temporary objects from engine
722 //=================================================================================
723 void RepairGUI_GlueDlg::clearTemporary()
725 ObjectList::iterator anIter;
726 for (anIter = myTmpObjs.begin(); anIter != myTmpObjs.end(); ++anIter)
727 getGeomEngine()->RemoveObject(*anIter);
732 //=================================================================================
733 // function : onTolerChanged
734 // purpose : Remove temporary objects from engine
735 //=================================================================================
736 void RepairGUI_GlueDlg::onTolerChanged( double /*theVal*/ )
743 //=================================================================================
744 // function : onSubShapesChk
745 // purpose : Update selection mode
746 //=================================================================================
747 void RepairGUI_GlueDlg::onSubShapesChk()
749 if ( !mySubShapesChk->isChecked() )
755 //=================================================================================
756 // function : ClickOnCancel
757 // purpose : Remove temporary objects from engine and call method of base class
758 //=================================================================================
759 void RepairGUI_GlueDlg::ClickOnCancel()
762 GEOMBase_Skeleton::ClickOnCancel();
765 //================================================================
766 // Function : getEntry
768 //================================================================
769 static string getEntry( GEOM::GEOM_Object_ptr object )
771 SUIT_Session* session = SUIT_Session::session();
772 SalomeApp_Application* app = dynamic_cast<SalomeApp_Application*>( session->activeApplication() );
775 string IOR = app->orb()->object_to_string( object );
778 SalomeApp_Study* study = ( SalomeApp_Study* )app->activeStudy();
779 _PTR(SObject) SO ( study->studyDS()->FindObjectIOR( IOR ) );