Salome HOME
Update mail address
[modules/geom.git] / src / GroupGUI / GroupGUI_GroupDlg.cxx
1 //  GEOM GEOMGUI : GUI for Geometry component
2 //
3 //  Copyright (C) 2004  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
5 // 
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. 
10 // 
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. 
15 // 
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 
19 // 
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22 //
23 //
24 //  File   : GroupGUI_GroupDlg.cxx
25 //  Author : Sergey ANIKIN
26 //  Module : GEOM
27 //  $Header$
28
29 #include "GroupGUI_GroupDlg.h"
30
31 #include "SUIT_Desktop.h"
32 #include "SUIT_Session.h"
33 #include "SalomeApp_Application.h"
34 #include "SalomeApp_Study.h"
35 #include "LightApp_SelectionMgr.h"
36
37 #include "GEOMBase.h"
38
39 #include "GEOMImpl_Types.hxx"
40
41 #include <qlabel.h>
42 #include <qlistbox.h>
43 #include <qlineedit.h>
44 #include <qmap.h>
45
46 #include <TColStd_IndexedMapOfInteger.hxx>
47 #include <TColStd_MapOfInteger.hxx>
48
49
50 GroupGUI_GroupDlg::GroupGUI_GroupDlg(Mode mode, GeometryGUI* theGeometryGUI, QWidget* parent)
51   :GEOMBase_Skeleton( theGeometryGUI, parent, "GroupGUI_GroupDlg", false,
52                       WStyle_Customize | WStyle_NormalBorder | WStyle_Title | WStyle_SysMenu),
53    myMode( mode ),
54    myBusy( false )
55 {
56   SUIT_ResourceMgr* resMgr = SUIT_Session::session()->resourceMgr();
57
58   QPixmap image0     (resMgr->loadPixmap("GEOM", tr("ICON_OBJBROWSER_VERTEX")));
59   QPixmap image1     (resMgr->loadPixmap("GEOM", tr("ICON_OBJBROWSER_EDGE")));
60   QPixmap image2     (resMgr->loadPixmap("GEOM", tr("ICON_OBJBROWSER_FACE")));
61   QPixmap image3     (resMgr->loadPixmap("GEOM", tr("ICON_OBJBROWSER_SOLID")));
62   QPixmap iconSelect (resMgr->loadPixmap("GEOM", tr("ICON_SELECT")));
63
64   setCaption( myMode == CreateGroup ? tr( "CREATE_GROUP_TITLE" ) : tr( "EDIT_GROUP_TITLE" ) );
65
66   // Shape type button group
67   GroupConstructors->setEnabled( myMode == CreateGroup );
68   GroupConstructors->setTitle( tr( "SHAPE_TYPE" ) );
69   RadioButton1->setPixmap( image0 );
70   RadioButton2->setPixmap( image1 );
71   RadioButton3->setPixmap( image2 );
72   RadioButton4->setPixmap( image3 );
73   RadioButton4->show();
74
75   // Group name
76   GroupBoxName->setTitle( tr( "GROUP_NAME" ) );
77
78   // Main shape and sub-shapes
79   GroupMedium = new QGroupBox( 1, Qt::Vertical, tr( "MAIN_SUB_SHAPES" ), this );
80   GroupMedium->setInsideMargin( 10 );
81   Layout1->addWidget( GroupMedium, 2, 0 );
82
83   QWidget* aFrame = new QWidget( GroupMedium );
84   QGridLayout* aMedLayout = new QGridLayout( aFrame, 4, 4, 0, 6 );
85
86   QLabel* aMainLabel = new QLabel( tr( "MAIN_SHAPE" ), aFrame );
87
88   mySelBtn = new QPushButton( aFrame );
89   mySelBtn->setPixmap( iconSelect );
90   mySelBtn->setEnabled( myMode == CreateGroup );
91
92   myMainName = new QLineEdit( aFrame );
93   myMainName->setReadOnly( true );
94   myMainName->setEnabled( myMode == CreateGroup );
95
96   mySelSubBtn = new QPushButton( tr( "SELECT_SUB_SHAPES" ), aFrame );
97   mySelAllBtn = new QPushButton( tr( "SELECT_ALL" ), aFrame );
98   myAddBtn    = new QPushButton( tr( "ADD" ), aFrame );
99   myRemBtn    = new QPushButton( tr( "REMOVE" ), aFrame );
100   myIdList    = new QListBox( aFrame );
101
102   myIdList->setSelectionMode( QListBox::Extended );
103   myIdList->setRowMode( QListBox::FitToWidth );
104
105   aMedLayout->addWidget( aMainLabel, 0, 0 );
106   aMedLayout->addWidget( mySelBtn, 0, 1 );
107   aMedLayout->addMultiCellWidget( myMainName, 0, 0, 2, 3 );
108   aMedLayout->addMultiCellWidget( mySelSubBtn, 1, 1, 0, 2 );
109   aMedLayout->addWidget( mySelAllBtn, 1, 3 );
110   aMedLayout->addMultiCellWidget( myIdList, 2, 3, 0, 2 );
111   aMedLayout->addWidget( myAddBtn, 2, 3 );
112   aMedLayout->addWidget( myRemBtn, 3, 3 );
113
114   setHelpFileName("working_with_groups.htm");
115
116   Init();
117 }
118
119 GroupGUI_GroupDlg::~GroupGUI_GroupDlg()
120 {
121 }
122
123
124 //=================================================================================
125 // function : Init()
126 // purpose  :
127 //=================================================================================
128 void GroupGUI_GroupDlg::Init()
129 {
130   // san -- TODO: clear selected sub-shapes...
131
132   if ( myMode == CreateGroup ) {
133     initName( tr( "GROUP_PREFIX" ) );
134
135     // Get ready for main shape selection
136     myEditCurrentArgument = myMainName;
137
138     connect( GroupConstructors, SIGNAL( clicked( int ) ), this, SLOT( ConstructorsClicked( int ) ) );
139     connect( mySelBtn,          SIGNAL( clicked() ),      this, SLOT( SetEditCurrentArgument() ) );
140   }
141   else if ( myMode == EditGroup && IObjectCount() ) {
142     Standard_Boolean aResult = Standard_False;
143     GEOM::GEOM_Object_var anObj =
144       GEOMBase::ConvertIOinGEOMObject( firstIObject(), aResult );
145
146     if ( aResult && !CORBA::is_nil( anObj ) && anObj->GetType() == GEOM_GROUP ) {
147       myGroup = anObj;
148
149       ResultName->setText( GEOMBase::GetName( myGroup ) );
150
151       GEOM::GEOM_IGroupOperations_var anOp = GEOM::GEOM_IGroupOperations::_narrow( getOperation() );
152       myMainObj = anOp->GetMainShape( myGroup );
153       if ( !CORBA::is_nil( myMainObj ) )
154         myMainName->setText( GEOMBase::GetName( myMainObj ) );
155
156       setShapeType( (TopAbs_ShapeEnum)anOp->GetType( myGroup ) );
157
158       GEOM::ListOfLong_var aCurrList = anOp->GetObjects( myGroup );
159       QListBoxItem* anItem;
160       for ( int i = 0, n = aCurrList->length(); i < n; i++ ) {
161         anItem = new QListBoxText( QString( "%1" ).arg(aCurrList[i] ) );
162         myIdList->insertItem( anItem );
163       }
164
165       myEditCurrentArgument = 0;
166     }
167   }
168
169   LightApp_SelectionMgr* aSelMgr =
170     ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr();
171
172   connect( aSelMgr,     SIGNAL( currentSelectionChanged() ), this, SLOT( SelectionIntoArgument() ) );
173
174   connect( buttonOk   , SIGNAL( clicked() ), this, SLOT( ClickOnOk()    ) );
175   connect( buttonApply, SIGNAL( clicked() ), this, SLOT( ClickOnApply() ) );
176
177   connect( mySelSubBtn, SIGNAL( clicked() ), this, SLOT( SetEditCurrentArgument() ) );
178   connect( mySelAllBtn, SIGNAL( clicked() ), this, SLOT( SetEditCurrentArgument() ) );
179   connect( myAddBtn,    SIGNAL( clicked() ), this, SLOT( add() ) );
180   connect( myRemBtn,    SIGNAL( clicked() ), this, SLOT( remove() ) );
181   connect( myIdList,    SIGNAL( selectionChanged() ), this, SLOT( selectionChanged() ) );
182
183   activateSelection();
184 }
185
186 //=================================================================================
187 // function : enterEvent()
188 // purpose  :
189 //=================================================================================
190 void GroupGUI_GroupDlg::enterEvent( QEvent* e )
191 {
192   if ( !buttonCancel->isEnabled() )
193     this->ActivateThisDialog();
194 }
195
196 //=================================================================================
197 // function : ClickOnOk()
198 // purpose  :
199 //=================================================================================
200 void GroupGUI_GroupDlg::ClickOnOk()
201 {
202   if ( ClickOnApply() )
203     ClickOnCancel();
204 }
205
206 //=================================================================================
207 // function : ClickOnApply()
208 // purpose  :
209 //=================================================================================
210 bool GroupGUI_GroupDlg::ClickOnApply()
211 {
212   if ( !onAccept( myMode == CreateGroup, true ) )
213     return false;
214
215   if ( myMode == CreateGroup )
216     {
217       initName();
218       myIdList->clear();
219     }
220   return true;
221 }
222
223
224 //=================================================================================
225 // function : ActivateThisDialog()
226 // purpose  :
227 //=================================================================================
228 void GroupGUI_GroupDlg::ActivateThisDialog()
229 {
230   GEOMBase_Skeleton::ActivateThisDialog();
231
232   connect( ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr(),
233            SIGNAL( currentSelectionChanged() ), this, SLOT( SelectionIntoArgument() ) );
234
235   activateSelection();
236 }
237
238 //=================================================================================
239 // function : LineEditReturnPressed()
240 // purpose  :
241 //=================================================================================
242 void GroupGUI_GroupDlg::LineEditReturnPressed()
243 {
244   QLineEdit* send = ( QLineEdit* )sender();
245
246   if ( send == myMainName && !myEditCurrentArgument ) {
247     myEditCurrentArgument = myMainName;
248     activateSelection();
249   }
250   else
251     GEOMBase_Skeleton::LineEditReturnPressed();
252
253   updateState();
254 }
255
256
257 //=================================================================================
258 // function : SetEditCurrentArgument()
259 // purpose  :
260 //=================================================================================
261 void GroupGUI_GroupDlg::SetEditCurrentArgument()
262 {
263   QPushButton* send = (QPushButton*)sender();
264
265   if ( send == mySelBtn )
266     myEditCurrentArgument = myMainName;
267   else if ( send == mySelSubBtn || send == mySelAllBtn )
268     myEditCurrentArgument = 0;
269
270   activateSelection();
271
272   if ( send == mySelAllBtn )
273     selectAllSubShapes();
274   else
275     updateState();
276 }
277
278
279 //=================================================================================
280 // function : SelectionIntoArgument()
281 // purpose  : Called when selection has changed
282 //=================================================================================
283 void GroupGUI_GroupDlg::SelectionIntoArgument()
284 {
285   if ( myEditCurrentArgument ) {  // Selection of a main shape is active
286     myEditCurrentArgument->setText( "" );
287     myIdList->clear();
288
289     if ( IObjectCount() == 1 ) {
290       Standard_Boolean aResult = Standard_False;
291       GEOM::GEOM_Object_var anObj =
292         GEOMBase::ConvertIOinGEOMObject( firstIObject(), aResult );
293
294       if ( aResult && !anObj->_is_nil() && GEOMBase::IsShape( anObj ) ) {
295         myMainObj = anObj;
296         myEditCurrentArgument->setText( GEOMBase::GetName( anObj ) );
297         updateState();
298         return;
299       }
300     }
301
302     myMainObj = GEOM::GEOM_Object::_nil();
303   }
304   else { // an attempt to synchronize list box selection with 3d viewer
305     if ( myBusy )
306       return;
307
308     bool isBlocked = myIdList->signalsBlocked();
309     myIdList->blockSignals( true );
310     myIdList->clearSelection();
311
312     TColStd_IndexedMapOfInteger aMapIndex;
313
314     if ( IObjectCount() == 1 ) {
315       Standard_Boolean aResult = Standard_False;
316       GEOM::GEOM_Object_var anObj =
317         GEOMBase::ConvertIOinGEOMObject( firstIObject(), aResult );
318
319       if ( aResult && !anObj->_is_nil() )
320         ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->
321           selectionMgr()->GetIndexes( firstIObject(), aMapIndex );
322     }
323
324     // try to find out and process the object browser selection
325     if ( !aMapIndex.Extent() ) {
326       globalSelection( GEOM_ALLSHAPES );
327       
328       GEOM::ListOfGO anObjects;
329       GEOMBase::ConvertListOfIOInListOfGO(selectedIO(), anObjects);
330       GEOM::GEOM_ILocalOperations_var aLocOp = getGeomEngine()->GetILocalOperations( getStudyId() );
331       for (int i = 0; i < anObjects.length(); i++) {
332         TopoDS_Shape aShape;
333         if ( GEOMBase::GetShape(anObjects[i], aShape, getShapeType()) ) {
334           CORBA::Long anIndex = aLocOp->GetSubShapeIndex( myMainObj, anObjects[i] );
335           if ( anIndex >= 0 )
336             aMapIndex.Add( anIndex );
337         }
338       }
339       
340       if ( !myMainObj->_is_nil() )
341         localSelection( myMainObj, getShapeType() );
342     }
343
344     if (aMapIndex.Extent() >= 1) {
345       QMap<int, int> aMap;
346       for ( int i = 0, n = myIdList->count(); i < n; i++ )
347         aMap.insert( myIdList->item( i )->text().toInt(), i );
348
349       for ( int ii = 1, nn = aMapIndex.Extent(); ii <= nn; ii++ ) {
350         if ( aMap.contains( aMapIndex( ii ) ) )
351           myIdList->setSelected( aMap[aMapIndex( ii )], true );
352       }
353     }
354     myIdList->blockSignals( isBlocked );
355   }
356
357   updateState();
358 }
359
360 //=================================================================================
361 // function : ConstructorsClicked()
362 // purpose  : Radio button management
363 //=================================================================================
364 void GroupGUI_GroupDlg::ConstructorsClicked( int constructorId )
365 {
366   myIdList->clear();
367   activateSelection();
368   updateState();
369 }
370
371 //=================================================================================
372 // function : selectAllSubShapes
373 // purpose  : 
374 //=================================================================================
375 void GroupGUI_GroupDlg::selectAllSubShapes()
376 {
377   if ( CORBA::is_nil( myMainObj ) )
378     return;
379
380   GEOM::GEOM_IShapesOperations_var aShOp = getGeomEngine()->GetIShapesOperations( getStudyId() );
381   GEOM::GEOM_ILocalOperations_var aLocOp = getGeomEngine()->GetILocalOperations( getStudyId() );
382
383   GEOM::ListOfGO_var aSubShapes = aShOp->MakeExplode( myMainObj, getShapeType(), false );
384   if ( !aShOp->IsDone() )
385     return;
386
387   bool isBlocked = myIdList->signalsBlocked();
388   myIdList->blockSignals( true );
389   myIdList->clear();
390
391   QListBoxItem* anItem;
392   for ( int i = 0, n = aSubShapes->length(); i < n; i++ ) {
393     CORBA::Long anIndex = aLocOp->GetSubShapeIndex( myMainObj, aSubShapes[i] );
394     if ( anIndex < 0 )
395       continue;
396
397     anItem = new QListBoxText( QString( "%1" ).arg( anIndex ) );
398     myIdList->insertItem( anItem );
399     myIdList->setSelected( anItem, true );
400   }
401
402   myIdList->blockSignals( isBlocked );
403   highlightSubShapes();
404   updateState();
405 }
406
407 //=================================================================================
408 // function : add
409 // purpose  : 
410 //=================================================================================
411 void GroupGUI_GroupDlg::add()
412 {
413   TColStd_MapOfInteger aMap;
414   for ( int i = 0, n = myIdList->count(); i < n; i++ )
415     aMap.Add( myIdList->item( i )->text().toInt() );
416
417   TColStd_IndexedMapOfInteger aMapIndex;
418
419   if ( IObjectCount() == 1 ) {
420     Standard_Boolean aResult = Standard_False;
421     GEOM::GEOM_Object_var anObj =
422       GEOMBase::ConvertIOinGEOMObject( firstIObject(), aResult );
423
424     if ( aResult && !anObj->_is_nil() )
425       ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->
426         selectionMgr()->GetIndexes( firstIObject(), aMapIndex );
427   }
428
429   // try to find out and process the object browser selection
430   if ( !aMapIndex.Extent() ) {
431     GEOM::ListOfGO anObjects;
432     GEOMBase::ConvertListOfIOInListOfGO(selectedIO(), anObjects);
433     GEOM::GEOM_ILocalOperations_var aLocOp = getGeomEngine()->GetILocalOperations( getStudyId() );
434     for (int i = 0; i < anObjects.length(); i++) {
435       TopoDS_Shape aShape;
436       if ( GEOMBase::GetShape(anObjects[i], aShape, getShapeType()) ) {
437         CORBA::Long anIndex = aLocOp->GetSubShapeIndex( myMainObj, anObjects[i] );
438         if ( anIndex >= 0 )
439           aMapIndex.Add( anIndex );
440       }
441     }
442   }
443
444   if ( aMapIndex.Extent() >= 1 ) {
445     QListBoxItem* anItem;
446     bool isBlocked = myIdList->signalsBlocked();
447     myIdList->blockSignals( true );
448
449     for ( int i = 1, n = aMapIndex.Extent(); i <= n; i++ ) {
450       if ( aMap.Contains( aMapIndex( i ) ) )
451         continue;
452
453       anItem = new QListBoxText( QString( "%1" ).arg( aMapIndex( i ) ) );
454       myIdList->insertItem( anItem );
455       myIdList->setSelected( anItem, true );
456     }
457
458     myIdList->blockSignals( isBlocked );
459   }
460
461   updateState();
462 }
463
464 //=================================================================================
465 // function : remove
466 // purpose  : 
467 //=================================================================================
468 void GroupGUI_GroupDlg::remove()
469 {
470   for ( int i = myIdList->count() - 1; i >= 0; i-- ) {
471     if ( myIdList->isSelected( i ) )
472       myIdList->removeItem( i );
473   }
474   updateState();
475 }
476
477
478 //=================================================================================
479 // function : getConstructorId()
480 // purpose  :
481 //=================================================================================
482 int GroupGUI_GroupDlg::getConstructorId() const
483 {
484   return GroupConstructors->id( GroupConstructors->selected() );
485 }
486
487 //=================================================================================
488 // function : getShapeType()
489 // purpose  :
490 //=================================================================================
491 TopAbs_ShapeEnum GroupGUI_GroupDlg::getShapeType() const
492 {
493   switch ( getConstructorId() ) {
494   case 0:  return TopAbs_VERTEX;
495   case 1:  return TopAbs_EDGE;
496   case 2:  return TopAbs_FACE;
497   case 3:  return TopAbs_SOLID;
498   default: return TopAbs_SHAPE;
499   }
500 }
501
502 //=================================================================================
503 // function : setShapeType()
504 // purpose  :
505 //=================================================================================
506 void GroupGUI_GroupDlg::setShapeType( const TopAbs_ShapeEnum theType )
507 {
508   int anId = 0;
509   switch ( theType ) {
510   case TopAbs_VERTEX: anId = 0; break;
511   case TopAbs_EDGE:   anId = 1; break;
512   case TopAbs_FACE:   anId = 2; break;
513   case TopAbs_SOLID:  anId = 3; break;
514   }
515   GroupConstructors->setButton( anId );
516 }
517
518
519 //=================================================================================
520 // function : activateSelection
521 // purpose  : Activate selection in accordance with myEditCurrentArgument
522 //=================================================================================
523 void GroupGUI_GroupDlg::activateSelection()
524 {
525   globalSelection( GEOM_ALLSHAPES );
526
527   if ( !myMainObj->_is_nil() && !myEditCurrentArgument ) {
528     localSelection( myMainObj, getShapeType() );
529   }
530
531   SelectionIntoArgument();
532 }
533
534 //=================================================================================
535 // function : updateState
536 // purpose  : 
537 //=================================================================================
538 void GroupGUI_GroupDlg::updateState()
539 {
540   bool isAdd = false;
541
542   TColStd_IndexedMapOfInteger aMapIndex;
543
544   if ( IObjectCount() == 1 ) {
545     Standard_Boolean aResult = Standard_False;
546     GEOM::GEOM_Object_var anObj =
547       GEOMBase::ConvertIOinGEOMObject( firstIObject(), aResult );
548
549     if ( aResult && !anObj->_is_nil() )
550       ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->
551         selectionMgr()->GetIndexes( firstIObject(), aMapIndex );
552   }
553
554   // try to find out and process the object browser selection
555   if ( !aMapIndex.Extent() && !CORBA::is_nil( myMainObj ) ) {
556     isAdd = true;
557     GEOM::ListOfGO anObjects;
558     GEOMBase::ConvertListOfIOInListOfGO(selectedIO(), anObjects);
559     GEOM::GEOM_ILocalOperations_var aLocOp = getGeomEngine()->GetILocalOperations( getStudyId() );
560     for (int i = 0; i < anObjects.length(); i++) {
561       TopoDS_Shape aShape;
562       if ( GEOMBase::GetShape(anObjects[i], aShape, getShapeType()) ) {
563         CORBA::Long anIndex = aLocOp->GetSubShapeIndex( myMainObj, anObjects[i] );
564         if ( anIndex >= 0 )
565           aMapIndex.Add( anIndex );
566         else
567           isAdd = false;
568       }
569       else
570         isAdd = false;
571
572       if ( !isAdd ) {
573         aMapIndex.Clear();
574         break;
575       }
576     }
577   }
578
579   isAdd = aMapIndex.Extent() > 0;
580
581   myAddBtn->setEnabled( !myEditCurrentArgument && !CORBA::is_nil( myMainObj ) && isAdd );
582   bool hasSel = false;
583   for ( int ii = 0, nn = myIdList->count(); !hasSel && ii < nn; ii++ )
584     hasSel =  myIdList->isSelected( ii );
585   myRemBtn->setEnabled( hasSel );
586   mySelSubBtn->setEnabled( !CORBA::is_nil( myMainObj ) );
587   mySelAllBtn->setEnabled( !CORBA::is_nil( myMainObj ) );
588 }
589
590 //=================================================================================
591 // function : selectionChanged
592 // purpose  :
593 //=================================================================================
594 void GroupGUI_GroupDlg::selectionChanged()
595 {
596   highlightSubShapes();
597 }
598
599 //=================================================================================
600 // function : highlightSubShapes
601 // purpose  :
602 //=================================================================================
603 void GroupGUI_GroupDlg::highlightSubShapes()
604 {
605   if ( CORBA::is_nil( myMainObj ) )
606     return;
607
608   Standard_Boolean isOk;
609   Handle(GEOM_AISShape) aSh =
610     GEOMBase::ConvertIORinGEOMAISShape( GEOMBase::GetIORFromObject( myMainObj ), isOk, true );
611   if ( !isOk || aSh.IsNull() )
612     return;
613
614   TColStd_MapOfInteger anIds;
615
616   myBusy = true;
617
618   for ( int ii = 0, nn = myIdList->count(); ii < nn; ii++ )
619     if ( myIdList->isSelected( ii ) )
620       anIds.Add( myIdList->item( ii )->text().toInt() );
621
622   LightApp_SelectionMgr* aSelMgr =
623     ((SalomeApp_Application*)(SUIT_Session::session()->activeApplication()))->selectionMgr();
624   aSelMgr->clearSelected();
625   aSelMgr->AddOrRemoveIndex( aSh->getIO(), anIds, false );
626
627   myBusy = false;
628
629   updateState();
630 }
631
632 //=================================================================================
633 // function : createOperation
634 // purpose  :
635 //=================================================================================
636 GEOM::GEOM_IOperations_ptr GroupGUI_GroupDlg::createOperation()
637 {
638   return getGeomEngine()->GetIGroupOperations( getStudyId() );
639 }
640
641 #define RETURN_WITH_MSG(a, b) \
642   if ( !(a) ) { \
643     theMessage += (b); \
644     return false; \
645   }
646
647 //=================================================================================
648 // function : isValid()
649 // purpose  : Verify validity of input data
650 //=================================================================================
651 bool GroupGUI_GroupDlg::isValid( QString& theMessage )
652 {
653   SalomeApp_Study* study = getStudy();
654   ASSERT(study);
655   RETURN_WITH_MSG  ( !study->studyDS()->GetProperties()->IsLocked(), tr( "GEOM_STUDY_LOCKED" ) )
656
657   if ( myMode == CreateGroup ) {
658     RETURN_WITH_MSG( !CORBA::is_nil( myMainObj ), tr( "NO_MAIN_OBJ" ) )
659   }
660   else {
661     RETURN_WITH_MSG( !CORBA::is_nil( myMainObj ), tr( "NO_GROUP" ) )
662   }
663
664   QString aName (getNewObjectName());
665   RETURN_WITH_MSG  ( !aName.stripWhiteSpace().isEmpty(), tr( "EMPTY_NAME" ) )
666
667   RETURN_WITH_MSG  ( myIdList->count(), tr( "EMPTY_LIST" ) )
668   return true;
669 }
670
671 //=================================================================================
672 // function : execute
673 // purpose  :
674 //=================================================================================
675 bool GroupGUI_GroupDlg::execute( ObjectList& objects )
676 {
677   GEOM::GEOM_IGroupOperations_var anOp = GEOM::GEOM_IGroupOperations::_narrow( getOperation() );
678
679   GEOM::GEOM_Object_var aGroup;
680   if ( myMode == CreateGroup )
681     aGroup = anOp->CreateGroup( myMainObj, getShapeType() );
682   else if ( myMode == EditGroup )
683     aGroup = myGroup;
684
685   if ( CORBA::is_nil( aGroup ) || ( myMode == CreateGroup && !anOp->IsDone() ) )
686     return false;
687
688   GEOM::ListOfLong_var aCurrList = anOp->GetObjects( aGroup );
689   if ( !anOp->IsDone()  )
690     return false;
691
692   for ( int i = 0, n = aCurrList->length(); i < n; i++ ) {
693     anOp->RemoveObject( aGroup, aCurrList[i] );
694     if ( !anOp->IsDone()  )
695       return false;
696   }
697
698   for ( int ii = 0, nn = myIdList->count(); ii < nn; ii++ ) {
699     anOp->AddObject( aGroup, myIdList->item( ii )->text().toInt() );
700     if ( !anOp->IsDone()  )
701       return false;
702   }
703
704   SalomeApp_Study* study = getStudy();
705   if ( study ) {
706     string IOR = GEOMBase::GetIORFromObject( aGroup );
707     if ( IOR != "" ) {
708       _PTR(SObject) SO ( study->studyDS()->FindObjectIOR( IOR ) );
709       if ( SO ) {
710         _PTR(StudyBuilder) aBuilder (study->studyDS()->NewBuilder());
711         aBuilder->SetName( SO, getNewObjectName() );
712       }
713     }
714   }
715
716   objects.push_back( aGroup._retn() );
717
718   return true;
719 }
720
721 //================================================================
722 // Function : getFather
723 // Purpose  : Get father object for object to be added in study
724 //            ( called with addInStudy method )
725 //================================================================
726 GEOM::GEOM_Object_ptr GroupGUI_GroupDlg::getFather( GEOM::GEOM_Object_ptr theObj )
727 {
728   GEOM::GEOM_Object_var aFatherObj;
729   if ( theObj->GetType() == GEOM_GROUP ) {
730     GEOM::GEOM_IGroupOperations_var anOp = GEOM::GEOM_IGroupOperations::_narrow( getOperation() );
731     aFatherObj = anOp->GetMainShape( theObj );
732   }
733   return aFatherObj._retn();
734 }