Salome HOME
Fix for Bug NPAL16771(EDF 556 SMESH : Can't select some groups of nodes in the VTK...
[modules/smesh.git] / src / SMESHGUI / SMESHGUI_GroupDlg.cxx
index ed7295a118ce4c509100660c738021af0a52acfc..8c0cd520af22092fd86f417a23a5929611c7b958 100644 (file)
@@ -1,23 +1,23 @@
 //  SMESH SMESHGUI : GUI for SMESH component
 //
 //  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
-//  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS 
-// 
-//  This library is free software; you can redistribute it and/or 
-//  modify it under the terms of the GNU Lesser General Public 
-//  License as published by the Free Software Foundation; either 
-//  version 2.1 of the License. 
-// 
-//  This library is distributed in the hope that it will be useful, 
-//  but WITHOUT ANY WARRANTY; without even the implied warranty of 
-//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU 
-//  Lesser General Public License for more details. 
-// 
-//  You should have received a copy of the GNU Lesser General Public 
-//  License along with this library; if not, write to the Free Software 
-//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA 
-// 
-//  See http://www.salome-platform.org or email : webmaster.salome@opencascade.org 
+//  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
+//
+//  This library is free software; you can redistribute it and/or
+//  modify it under the terms of the GNU Lesser General Public
+//  License as published by the Free Software Foundation; either
+//  version 2.1 of the License.
+//
+//  This library is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+//  Lesser General Public License for more details.
+//
+//  You should have received a copy of the GNU Lesser General Public
+//  License along with this library; if not, write to the Free Software
+//  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
+//
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
 //
 //
 //
@@ -28,7 +28,7 @@
 
 #include "SMESHGUI_GroupDlg.h"
 #include "SMESHGUI_FilterDlg.h"
-#include "SMESHGUI_Filter.h"
+#include "SMESHGUI_ShapeByMeshDlg.h"
 
 #include "SMESHGUI.h"
 #include "SMESHGUI_Utils.h"
 #include "SMESHGUI_FilterUtils.h"
 #include "SMESHGUI_GEOMGenUtils.h"
 
-#include "SALOMEGUI_QtCatchCorbaException.hxx"
-#include "SALOME_ListIteratorOfListIO.hxx"
-#include "VTKViewer_ViewFrame.h"
-#include "QAD_Application.h"
-#include "QAD_Desktop.h"
-#include "QAD_MessageBox.h"
-#include "QAD_RightFrame.h"
-#include "utilities.h"
-
+#include "SMESH_TypeFilter.hxx"
 #include "SMESH_Actor.h"
 
 #include "GEOMBase.h"
+#include "GEOM_SelectionFilter.h"
+
+#include "SUIT_Desktop.h"
+#include "SUIT_ResourceMgr.h"
+#include "SUIT_Session.h"
+#include "SUIT_MessageBox.h"
+
+#include "SalomeApp_Tools.h"
+#include "SalomeApp_Application.h"
+#include "SalomeApp_Study.h"
+#include "LightApp_Application.h"
+#include "SALOMEDSClient_Study.hxx"
+#include "SALOME_ListIO.hxx"
+#include "SALOME_ListIteratorOfListIO.hxx"
+
+#include "SVTK_ViewWindow.h"
+#include "SVTK_Selector.h"
+
+#include "utilities.h"
+
+// OCCT Includes
+#include <TColStd_MapOfInteger.hxx>
 
 // QT Includes
 #include <qbuttongroup.h>
+#include <qcursor.h>
 #include <qgroupbox.h>
 #include <qhbox.h>
 #include <qlabel.h>
 #include <qlineedit.h>
 #include <qpushbutton.h>
+#include <qtoolbutton.h>
 #include <qradiobutton.h>
 #include <qcheckbox.h>
 #include <qlayout.h>
@@ -67,6 +83,8 @@
 #include <qmemarray.h>
 #include <qwidgetstack.h>
 
+#include <QtxIntSpinBox.h>
+
 // STL includes
 #include <vector>
 #include <algorithm>
 using namespace std;
 
 //=================================================================================
-// class    : SMESHGUI_GroupDlg()
-// purpose  : 
+// function : SMESHGUI_GroupDlg()
+// purpose  :
 //=================================================================================
-SMESHGUI_GroupDlg::SMESHGUI_GroupDlg( QWidget* parent, const char* name, SALOME_Selection* theSel,
-                                     SMESH::SMESH_Mesh_ptr theMesh, bool modal, WFlags fl )
-  : QDialog( parent, name, modal, WStyle_Customize | WStyle_NormalBorder | WStyle_Title | WStyle_SysMenu | WDestructiveClose )
+SMESHGUI_GroupDlg::SMESHGUI_GroupDlg( SMESHGUI* theModule, const char* name,
+                                     SMESH::SMESH_Mesh_ptr theMesh, bool modal, WFlags fl)
+     : QDialog( SMESH::GetDesktop( theModule ), name, modal, WStyle_Customize | WStyle_NormalBorder |
+                WStyle_Title | WStyle_SysMenu | WDestructiveClose),
+     mySMESHGUI( theModule ),
+     mySelectionMgr( SMESH::GetSelectionMgr( theModule ) ),
+     mySelector(SMESH::GetViewWindow( theModule )->GetSelector()),
+     myIsBusy( false ),
+     myActor( 0 )
 {
-  if ( !name ) setName( "SMESHGUI_GroupDlg" );
-  initDialog(theSel, true);
+  if (!name) setName("SMESHGUI_GroupDlg");
+  initDialog(true);
   if (!theMesh->_is_nil())
     init(theMesh);
   else {
@@ -91,49 +115,65 @@ SMESHGUI_GroupDlg::SMESHGUI_GroupDlg( QWidget* parent, const char* name, SALOME_
     myGeomGroupBtn->setEnabled(false);
     myGeomGroupLine->setEnabled(false);
   }
-  
-  /* Move widget on the botton right corner of main widget */
-  int x, y ;
-  mySMESHGUI->DefineDlgPosition(this, x, y);
-  this->move(x, y);
 }
 
-SMESHGUI_GroupDlg::SMESHGUI_GroupDlg( QWidget* parent, const char* name, SALOME_Selection* theSel,
-                                     SMESH::SMESH_Group_ptr theGroup, bool modal, WFlags fl )
-  : QDialog( parent, name, modal, WStyle_Customize | WStyle_NormalBorder | WStyle_Title | WStyle_SysMenu | WDestructiveClose )
+//=================================================================================
+// function : SMESHGUI_GroupDlg()
+// purpose  :
+//=================================================================================
+SMESHGUI_GroupDlg::SMESHGUI_GroupDlg( SMESHGUI* theModule, const char* name,
+                                     SMESH::SMESH_GroupBase_ptr theGroup, bool modal, WFlags fl)
+     : QDialog( SMESH::GetDesktop( theModule ), name, modal, WStyle_Customize | WStyle_NormalBorder |
+                WStyle_Title | WStyle_SysMenu | WDestructiveClose),
+     mySMESHGUI( theModule ),
+     mySelectionMgr( SMESH::GetSelectionMgr( theModule ) ),
+     mySelector(SMESH::GetViewWindow( theModule )->GetSelector()),
+     myIsBusy( false )
 {
-  if ( !name ) setName( "SMESHGUI_GroupDlg" );
-  initDialog(theSel, false);
+  if (!name) setName("SMESHGUI_GroupDlg");
+
+  initDialog(false);
   if (!theGroup->_is_nil())
     init(theGroup);
   else {
     mySelectSubMesh->setEnabled(false);
     mySelectGroup->setEnabled(false);
+
+    myCurrentLineEdit = myMeshGroupLine;
+    setSelectionMode(5);
   }
-  
-  /* Move widget on the botton right corner of main widget */
-  int x, y ;
-  mySMESHGUI->DefineDlgPosition(this, x, y);
-  this->move(x, y);
 }
 
-void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
+//=================================================================================
+// function : SMESHGUI_GroupDlg()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::initDialog(bool create)
 {
   myFilterDlg = 0;
   myCreate = create;
   myCurrentLineEdit = 0;
-  
-  QPixmap image0(QAD_Desktop::getResourceManager()->loadPixmap( "SMESH",tr("ICON_SELECT")));
 
-  if (create)
-    setCaption( tr( "SMESH_CREATE_GROUP_TITLE"  ) );
-  else
-    setCaption( tr( "SMESH_EDIT_GROUP_TITLE"  ) );
-        
-  setSizeGripEnabled( TRUE );
+  myShapeByMeshOp = 0;
+  myGeomPopup = 0;
+  myGeomObjects = new GEOM::ListOfGO();
+  myGeomObjects->length(0);
+
+  QPixmap image0 (SMESH::GetResourceMgr( mySMESHGUI )->loadPixmap("SMESH", tr("ICON_SELECT")));
+
+  if (create) {
+    setCaption(tr("SMESH_CREATE_GROUP_TITLE"));
+    myHelpFileName = "/files/creating_groups.htm";
+  }
+  else {
+    setCaption(tr("SMESH_EDIT_GROUP_TITLE"));
+    myHelpFileName = "/files/editing_groups.htm";
+  }
+
+  setSizeGripEnabled(TRUE);
 
   QGridLayout* aMainLayout = new QGridLayout(this, 7, 3, 11, 6);
-  
+
   /***************************************************************/
   QLabel* meshGroupLab = new QLabel(this, "mesh/group label");
   if (create)
@@ -144,7 +184,7 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   myMeshGroupBtn->setPixmap(image0);
   myMeshGroupLine = new QLineEdit(this, "mesh/group line");
   myMeshGroupLine->setReadOnly(true);
+
   /***************************************************************/
   myTypeGroup = new QButtonGroup(1, Qt::Vertical, this, "Group types");
   myTypeGroup->setTitle(tr("SMESH_ELEMENTS_TYPE"));
@@ -161,7 +201,7 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   }
   myTypeGroup->setEnabled(create);
   myTypeId = -1;
-    
+
   /***************************************************************/
   QLabel* aName = new QLabel(this, "name label");
   aName->setText(tr("SMESH_NAME"));
@@ -181,7 +221,7 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   myWGStack = new QWidgetStack( this, "widget stack");
   QWidget* wg1 = new QFrame( myWGStack, "first widget" );
   QWidget* wg2 = new QFrame( myWGStack, "second widget" );
-  
+
   /***************************************************************/
   QGroupBox* aContentBox = new QGroupBox(1, Qt::Horizontal, wg1, "content box");
   aContentBox->setTitle(tr("SMESH_CONTENT"));
@@ -220,7 +260,7 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   /***************************************************************/
   QGroupBox* aSelectBox = new QGroupBox(3, Qt::Horizontal, wg1, "select box");
   aSelectBox->setTitle(tr("SMESH_SELECT_FROM"));
-  
+
   mySelectSubMesh = new QCheckBox(aSelectBox, "submesh checkbox");
   mySelectSubMesh->setText(tr("SMESH_SUBMESH"));
   mySelectSubMesh->setMinimumSize(50, 0);
@@ -230,7 +270,7 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   mySubMeshLine = new QLineEdit(aSelectBox, "submesh line");
   mySubMeshLine->setReadOnly(true);
   onSelectSubMesh(false);
-  
+
   mySelectGroup = new QCheckBox(aSelectBox, "group checkbox");
   mySelectGroup->setText(tr("SMESH_GROUP"));
   mySelectGroup->setMinimumSize(50, 0);
@@ -250,13 +290,19 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   /***************************************************************/
   QLabel* geomObject = new QLabel(wg2, "geometry object label");
   geomObject->setText(tr("SMESH_OBJECT_GEOM"));
-  myGeomGroupBtn = new QPushButton(wg2, "geometry group button");
-  myGeomGroupBtn->setText("");
-  myGeomGroupBtn->setPixmap(image0);
+  myGeomGroupBtn = new QToolButton(wg2, "geometry group button");
+  myGeomGroupBtn->setIconSet( QIconSet(image0) );
+  myGeomGroupBtn->setToggleButton(true);
   myGeomGroupLine = new QLineEdit(wg2, "geometry group line");
   myGeomGroupLine->setReadOnly(true); //VSR ???
   onSelectGeomGroup(false);
   
+  if (!create)
+    {
+      myGeomGroupBtn->setEnabled(false);
+      myGeomGroupLine->setEnabled(false);
+    }
+   
   /***************************************************************/
   QGridLayout* wg2Layout = new QGridLayout( wg2, 2, 3, 0, 6 );
   wg2Layout->addWidget(geomObject,     0, 0);
@@ -272,6 +318,21 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   myWGStack->addWidget( wg2, myGrpTypeGroup->id(rb2) );
 
   /***************************************************************/
+  QGroupBox* aColorBox = new QGroupBox(2, Qt::Horizontal, this, "color box");
+  aColorBox->setTitle(tr("SMESH_SET_COLOR"));
+
+  mySelectColorGroup = new QCheckBox(aColorBox, "color checkbox");
+  mySelectColorGroup->setText(tr("SMESH_CHECK_COLOR"));
+  
+  myColorSpinBox = new QtxIntSpinBox( aColorBox );
+  myColorSpinBox->setSizePolicy(QSizePolicy::MinimumExpanding, QSizePolicy::Fixed);
+  myColorSpinBox->setMinValue( 0 );
+  myColorSpinBox->setMaxValue( 9999 );
+  
+  onSelectColorGroup(false);
+  
+  /***************************************************************/
+  
   QFrame* aButtons = new QFrame(this, "button box");
   aButtons->setFrameStyle(QFrame::Box | QFrame::Sunken);
   QHBoxLayout* aBtnLayout = new QHBoxLayout(aButtons, 11, 6);
@@ -287,11 +348,15 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   QPushButton* aCloseBtn = new QPushButton(aButtons, "close");
   aCloseBtn->setText(tr("SMESH_BUT_CLOSE"));
   aCloseBtn->setAutoDefault(true);
+  QPushButton* aHelpBtn = new QPushButton(aButtons, "help");
+  aHelpBtn->setText(tr("SMESH_BUT_HELP"));
+  aHelpBtn->setAutoDefault(true);
 
   aBtnLayout->addWidget(aOKBtn);
   aBtnLayout->addWidget(aApplyBtn);
   aBtnLayout->addStretch();
   aBtnLayout->addWidget(aCloseBtn);
+  aBtnLayout->addWidget(aHelpBtn);
 
   /***************************************************************/
   aMainLayout->addWidget(meshGroupLab,    0, 0);
@@ -303,7 +368,8 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   aMainLayout->addMultiCellWidget(myGrpTypeGroup, 3, 3, 0, 2);
   aMainLayout->addMultiCellWidget(myWGStack,      4, 4, 0, 2);
   aMainLayout->setRowStretch( 5, 5 );
-  aMainLayout->addMultiCellWidget(aButtons,       6, 6, 0, 2);
+  aMainLayout->addMultiCellWidget(aColorBox,   6, 6, 0, 2);
+  aMainLayout->addMultiCellWidget(aButtons,       7, 7, 0, 2);
 
   /* signals and slots connections */
   connect(myMeshGroupBtn, SIGNAL(clicked()), this, SLOT(setCurrentSelection()));
@@ -324,15 +390,16 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   connect(mySelectGroup, SIGNAL(toggled(bool)), this, SLOT(onSelectGroup(bool)));
   connect(mySubMeshBtn, SIGNAL(clicked()), this, SLOT(setCurrentSelection()));
   connect(myGroupBtn, SIGNAL(clicked()), this, SLOT(setCurrentSelection()));
-  connect(myGeomGroupBtn, SIGNAL(clicked()), this, SLOT(setCurrentSelection()));
-
+  connect(myGeomGroupBtn, SIGNAL(toggled(bool)), this, SLOT(onGeomSelectionButton(bool)));
+  connect(mySelectColorGroup, SIGNAL(toggled(bool)), this, SLOT(onSelectColorGroup(bool)));
+  connect(myColorSpinBox, SIGNAL(valueChanged(const QString&)), this, SLOT(onNbColorsChanged(const QString&)));
+  
   connect(aOKBtn, SIGNAL(clicked()), this, SLOT(onOK()));
   connect(aApplyBtn, SIGNAL(clicked()), this, SLOT(onApply()));
   connect(aCloseBtn, SIGNAL(clicked()), this, SLOT(onClose()));
+  connect(aHelpBtn, SIGNAL(clicked()), this, SLOT(onHelp()));
 
   /* Init selection */
-  mySelection = theSel;  
-  mySMESHGUI = SMESHGUI::GetSMESHGUI();
   mySMESHGUI->SetActiveDialogBox(this);
   mySMESHGUI->SetState(800);
 
@@ -340,17 +407,19 @@ void SMESHGUI_GroupDlg::initDialog(SALOME_Selection* theSel, bool create)
   myMeshFilter = new SMESH_TypeFilter(MESH);
   mySubMeshFilter = new SMESH_TypeFilter(SUBMESH);
   myGroupFilter = new SMESH_TypeFilter(GROUP);
-
+  SalomeApp_Study* aStudy = dynamic_cast<SalomeApp_Study*>( mySMESHGUI->application()->activeStudy() );
+  myGeomFilter = new GEOM_SelectionFilter( aStudy, true );
+  
   connect(mySMESHGUI, SIGNAL(SignalDeactivateActiveDialog()), this, SLOT(onDeactivate()));
   connect(mySMESHGUI, SIGNAL(SignalCloseAllDialogs()), this, SLOT(onClose()));
-  connect(mySelection, SIGNAL(currentSelectionChanged()), this, SLOT(onObjectSelectionChanged()));
+  connect(mySelectionMgr, SIGNAL(currentSelectionChanged()), this, SLOT(onObjectSelectionChanged()));
 
   myGrpTypeGroup->setButton(myGrpTypeGroup->id(rb1)); // VSR !!!
   onGrpTypeChanged(myGrpTypeGroup->id(rb1)); // VSR!!!
 
   if (myMesh->_is_nil() )
     myTypeGroup->setButton(0);
-  
+
   updateButtons();
 }
 
@@ -368,23 +437,30 @@ SMESHGUI_GroupDlg::~SMESHGUI_GroupDlg()
   }
 }
 
-
 //=================================================================================
 // function : Init()
 // purpose  :
 //=================================================================================
-void SMESHGUI_GroupDlg::init(SMESH::SMESH_Mesh_ptr theMesh)
+void SMESHGUI_GroupDlg::init (SMESH::SMESH_Mesh_ptr theMesh)
 {
+  mySelectionMgr->installFilter(myMeshFilter);
+
   /* init data from current selection */
   myMesh = SMESH::SMESH_Mesh::_duplicate(theMesh);
   myGroup = SMESH::SMESH_Group::_nil();
-  
+  myGroupOnGeom = SMESH::SMESH_GroupOnGeom::_nil();
+
   myActor = SMESH::FindActorByObject(myMesh);
   SMESH::SetPickable(myActor);
-   
-  QString aName = mySelection->firstIObject()->getName();
-  myMeshGroupLine->setText(aName) ;
-  myMeshGroupLine->home( false );
+
+  SALOME_ListIO aList;
+  mySelectionMgr->selectedObjects( aList );
+  if( !aList.IsEmpty() )
+  {
+    QString aName = aList.First()->getName();
+    myMeshGroupLine->setText(aName) ;
+    myMeshGroupLine->home( false );
+  }
 
   myCurrentLineEdit = 0;
 
@@ -396,59 +472,99 @@ void SMESHGUI_GroupDlg::init(SMESH::SMESH_Mesh_ptr theMesh)
 // function : Init()
 // purpose  :
 //=================================================================================
-void SMESHGUI_GroupDlg::init(SMESH::SMESH_Group_ptr theGroup)
+void SMESHGUI_GroupDlg::init (SMESH::SMESH_GroupBase_ptr theGroup)
 {
   myMesh = theGroup->GetMesh();
-  myGroup = SMESH::SMESH_Group::_duplicate(theGroup);
   
-  myActor = SMESH::FindActorByObject(myMesh);
-  if ( !myActor )
-    myActor = SMESH::FindActorByObject(myGroup);
-  SMESH::SetPickable(myActor);
+  myName->setText(theGroup->GetName());
+  myName->home(false);
+
+  myColorSpinBox->setValue( theGroup->GetColorNumber() );
   
+  myMeshGroupLine->setText(theGroup->GetName());
+
   int aType = 0;
   switch(theGroup->GetType()) {
   case SMESH::NODE: aType= 0; break;
   case SMESH::EDGE: aType = 1; break;
   case SMESH::FACE: aType = 2; break;
   case SMESH::VOLUME: aType = 3; break;
-  } 
-  
-  myName->setText(myGroup->GetName());
-  myName->home(false);
-  myMeshGroupLine->setText(myGroup->GetName());
-
-  myCurrentLineEdit = 0;
+  }
   myTypeGroup->setButton(aType);
-  myElements->clear();
-  setSelectionMode(aType);
-  myTypeId = aType;
   
-  myIdList.clear();
-  if (!theGroup->IsEmpty()) {
-    SMESH::long_array_var anElements = myGroup->GetListOfID();
-    int k = anElements->length();
-    for (int i = 0; i < k; i++) {
-      myIdList.append(anElements[i]);
-      myElements->insertItem(QString::number(anElements[i]));
+  myGroup = SMESH::SMESH_Group::_narrow( theGroup );
+
+  if ( !myGroup->_is_nil() )
+    {
+      myActor = SMESH::FindActorByObject(myMesh);
+      if ( !myActor )
+       myActor = SMESH::FindActorByObject(myGroup);
+      SMESH::SetPickable(myActor);
+
+      myGrpTypeGroup->setButton(0);
+      onGrpTypeChanged(0);
+      
+      myCurrentLineEdit = 0;
+      myElements->clear();
+      setSelectionMode(aType);
+      myTypeId = aType;
+      
+      myIdList.clear();
+      if (!myGroup->IsEmpty()) {
+       SMESH::long_array_var anElements = myGroup->GetListOfID();
+       int k = anElements->length();
+       for (int i = 0; i < k; i++) {
+         myIdList.append(anElements[i]);
+         myElements->insertItem(QString::number(anElements[i]));
+       }
+       myElements->selectAll(true);
+      }
+    }
+  else
+    {
+      myGroupOnGeom = SMESH::SMESH_GroupOnGeom::_narrow( theGroup );
+      
+      if ( !myGroupOnGeom->_is_nil() )
+       {
+         myActor = SMESH::FindActorByObject(myMesh);
+         if ( !myActor )
+           myActor = SMESH::FindActorByObject(myGroup);
+         SMESH::SetPickable(myActor);
+
+         myGrpTypeGroup->setButton(1);
+         onGrpTypeChanged(1);
+         
+         QString aShapeName("");
+         _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+         GEOM::GEOM_Object_var aGroupShape = myGroupOnGeom->GetShape();
+         if (!aGroupShape->_is_nil())
+           {
+             _PTR(SObject) aGroupShapeSO = aStudy->FindObjectID(aGroupShape->GetStudyEntry());
+             aShapeName = aGroupShapeSO->GetName().c_str();
+           }
+         myGeomGroupLine->setText( aShapeName );
+       }
     }
-    myElements->selectAll(true);
-  }
 }
 
-
 //=================================================================================
 // function : updateButtons()
-// purpose  : 
+// purpose  :
 //=================================================================================
 void SMESHGUI_GroupDlg::updateButtons()
 {
-  bool enable; 
-  
-  if (myGrpTypeId == 0)
-    enable = !myName->text().stripWhiteSpace().isEmpty() && myElements->count() > 0;
-  else if (myGrpTypeId == 1)
-    enable = !myName->text().stripWhiteSpace().isEmpty() && !CORBA::is_nil( myGeomGroup );
+  bool enable = !myName->text().stripWhiteSpace().isEmpty();
+
+  if (myGrpTypeId == 0) {
+    enable = enable && myElements->count() > 0;
+    enable = enable && (!myGroup->_is_nil() || !myMesh->_is_nil());
+  }
+  else if (myGrpTypeId == 1) {
+    if (CORBA::is_nil(myGroupOnGeom)) { // creation mode
+      enable = enable && myGeomObjects->length() > 0 && !myMesh->_is_nil();
+    }
+  }
+
   QPushButton* aBtn;
   aBtn = (QPushButton*) child("ok", "QPushButton");
   if (aBtn) aBtn->setEnabled(enable);
@@ -458,9 +574,18 @@ void SMESHGUI_GroupDlg::updateButtons()
 
 //=================================================================================
 // function : onNameChanged()
-// purpose  : 
+// purpose  :
 //=================================================================================
-void SMESHGUI_GroupDlg::onNameChanged(const QString& text)
+void SMESHGUI_GroupDlg::onNameChanged (const QString& text)
+{
+  updateButtons();
+}
+
+//=================================================================================
+// function : onNbColorsChanged()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::onNbColorsChanged (const QString& text)
 {
   updateButtons();
 }
@@ -469,7 +594,7 @@ void SMESHGUI_GroupDlg::onNameChanged(const QString& text)
 // function : onTypeChanged()
 // purpose  : Group elements type radio button management
 //=================================================================================
-void SMESHGUI_GroupDlg::onTypeChanged(int id)
+void SMESHGUI_GroupDlg::onTypeChanged (int id)
 {
   if (myTypeId != id) {
     myElements->clear();
@@ -483,7 +608,7 @@ void SMESHGUI_GroupDlg::onTypeChanged(int id)
 // function : onGrpTypeChanged()
 // purpose  : Group type radio button management
 //=================================================================================
-void SMESHGUI_GroupDlg::onGrpTypeChanged(int id)
+void SMESHGUI_GroupDlg::onGrpTypeChanged (int id)
 {
   if (myGrpTypeId != id) {
     myWGStack->raiseWidget( id );
@@ -496,43 +621,56 @@ void SMESHGUI_GroupDlg::onGrpTypeChanged(int id)
 // function : setSelectionMode()
 // purpose  : Radio button management
 //=================================================================================
-void SMESHGUI_GroupDlg::setSelectionMode(int theMode)
+void SMESHGUI_GroupDlg::setSelectionMode (int theMode)
 {
+  // PAL7314
+  if (myMesh->_is_nil())
+    return;
   if (mySelectionMode != theMode) {
-    mySelection->ClearIObjects();
-    mySelection->ClearFilters();
-    SMESH::SetPointRepresentation(false);
+    // [PAL10408] mySelectionMgr->clearSelected();
+    mySelectionMgr->clearFilters();
+    if (myActor)
+      myActor->SetPointRepresentation(false);
+    else
+      SMESH::SetPointRepresentation(false);
     if (theMode < 4) {
-      switch(theMode){
+      switch (theMode) {
       case 0:
-        if ( myActor )
-          myActor->SetPointRepresentation(true);
-        else
-          SMESH::SetPointRepresentation(true);
-       QAD_Application::getDesktop()->SetSelectionMode(NodeSelection, true);
+        if (myActor)
+         myActor->SetPointRepresentation(true);
+       else
+         SMESH::SetPointRepresentation(true);
+       if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+         aViewWindow->SetSelectionMode(NodeSelection);
        break;
       case 1:
-       QAD_Application::getDesktop()->SetSelectionMode(EdgeSelection, true);
+       if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+         aViewWindow->SetSelectionMode(EdgeSelection);
        break;
       case 2:
-       QAD_Application::getDesktop()->SetSelectionMode(FaceSelection, true);
+       if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+         aViewWindow->SetSelectionMode(FaceSelection);
        break;
       default:
-       QAD_Application::getDesktop()->SetSelectionMode(VolumeSelection, true);
+       if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+         aViewWindow->SetSelectionMode(VolumeSelection);
       }
-    }
-    else {
-      QAD_Application::getDesktop()->SetSelectionMode(ActorSelection, true);
+    } else {
       if (theMode == 4)
-       mySelection->AddFilter(mySubMeshFilter);
+       mySelectionMgr->installFilter(mySubMeshFilter);
       else if (theMode == 5)
-       mySelection->AddFilter(myGroupFilter);
+       mySelectionMgr->installFilter(myGroupFilter);
       else if (theMode == 6)
-       mySelection->AddFilter(myMeshFilter);
+       mySelectionMgr->installFilter(myMeshFilter);
+      else if (theMode == 7)
+       mySelectionMgr->installFilter(myGeomFilter);
+      
+      if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+       aViewWindow->SetSelectionMode(ActorSelection);
     }
     mySelectionMode = theMode;
-  }
-} 
+  } 
+}
 
 //=================================================================================
 // function : onApply()
@@ -540,19 +678,30 @@ void SMESHGUI_GroupDlg::setSelectionMode(int theMode)
 //=================================================================================
 bool SMESHGUI_GroupDlg::onApply()
 {
-  if (mySMESHGUI->ActiveStudyLocked())
+  if (mySMESHGUI->isActiveStudyLocked())
     return false;
-  
-  if ( myGrpTypeId == 0 && !myName->text().stripWhiteSpace().isEmpty() && myElements->count() > 0) {
-    mySelection->ClearIObjects();
-    if (myGroup->_is_nil()) {
+
+  if (myName->text().stripWhiteSpace().isEmpty())
+    return false;
+
+  if (myGrpTypeId == 0) { // on mesh elements
+    if (!myElements->count())
+      return false;
+
+    mySelectionMgr->clearSelected();
+
+    if (myGroup->_is_nil()) { // creation
+      if (myMesh->_is_nil())
+        return false;
+
       SMESH::ElementType aType = SMESH::ALL;
-      switch(myTypeId) {
+      switch (myTypeId) {
       case 0: aType = SMESH::NODE; break;
       case 1: aType = SMESH::EDGE; break;
       case 2: aType = SMESH::FACE; break;
       case 3: aType = SMESH::VOLUME; break;
       }
+
       SMESH::long_array_var anIdList = new SMESH::long_array;
       int i, k = myElements->count();
       anIdList->length(k);
@@ -563,19 +712,31 @@ bool SMESHGUI_GroupDlg::onApply()
 
       myGroup = SMESH::AddGroup(myMesh, aType, myName->text());
       myGroup->Add(anIdList.inout());
-      
+
+      int aColorNumber = myColorSpinBox->value();
+      myGroup->SetColorNumber(aColorNumber);
+
+      _PTR(SObject) aMeshGroupSO = SMESH::FindSObject(myGroup);
+
+      SMESH::setFileName ( aMeshGroupSO, QString::number(myColorSpinBox->value()) );
+      SMESH::setFileType ( aMeshGroupSO, "COULEURGROUP" );
+
       /* init for next operation */
       myName->setText("");
+      myColorSpinBox->setValue(0);
       myElements->clear();
       myGroup = SMESH::SMESH_Group::_nil();
-    }
-    else {
+
+    } else { // edition
       myGroup->SetName(myName->text());
+        
+      int aColorNumber = myColorSpinBox->value();
+      myGroup->SetColorNumber(aColorNumber);
 
       QValueList<int> aAddList;
       QValueList<int>::iterator anIt;
       QListBoxItem* anItem;
-      
+
       for (anItem = myElements->firstItem(); anItem != 0; anItem = anItem->next()) {
        int anId = anItem->text().toInt();
        if ((anIt = myIdList.find(anId)) == myIdList.end())
@@ -605,33 +766,102 @@ bool SMESHGUI_GroupDlg::onApply()
        myIdList.append(anItem->text().toInt());
     }
 
-    mySMESHGUI->GetActiveStudy()->updateObjBrowser(true);
+    mySMESHGUI->updateObjBrowser(true);
     SMESH::UpdateView(); // asv: fix of BUG PAL5515
-    mySelection->ClearIObjects();
+    mySelectionMgr->clearSelected();
     return true;
   }
-  else if (myGrpTypeId == 1 && !myName->text().stripWhiteSpace().isEmpty() && !CORBA::is_nil( myGeomGroup ))
-    {
+  else if (myGrpTypeId == 1) { // on geom object
+    if (CORBA::is_nil(myGroupOnGeom)) { // creation
+      if (myMesh->_is_nil() || !myGeomObjects->length())
+        return false;
+
       SMESH::ElementType aType = SMESH::ALL;
-      switch(myTypeId) {
+      switch (myTypeId) {
       case 0: aType = SMESH::NODE; break;
       case 1: aType = SMESH::EDGE; break;
       case 2: aType = SMESH::FACE; break;
       case 3: aType = SMESH::VOLUME; break;
       }
-      
-      SALOMEDS::Study_var aStudy = SMESH::GetActiveStudyDocument();
-      GEOM::GEOM_IGroupOperations_var aGroupOp = SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
-      
-      SMESH::SMESH_GroupOnGeom_var aGroupOnGeom = myMesh->CreateGroupFromGEOM(aType, myName->text(),myGeomGroup);
-      
-      mySMESHGUI->GetActiveStudy()->updateObjBrowser(true);
-      mySelection->ClearIObjects();
+
+      _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+      GEOM::GEOM_IGroupOperations_var aGroupOp =
+       SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
+
+      if (myGeomObjects->length() == 1) {
+       myGroupOnGeom = myMesh->CreateGroupFromGEOM(aType, myName->text(),myGeomObjects[0]);
+      }
+      else {
+        SMESH::SMESH_Gen_var aSMESHGen = SMESHGUI::GetSMESHGen();
+        if ( aSMESHGen->_is_nil() )
+          return false;
+
+        // create a geometry group
+        GEOM::GEOM_Gen_var geomGen = SMESH::GetGEOMGen();
+        _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+
+        if (geomGen->_is_nil() || !aStudy)
+          return false;
+
+        GEOM::GEOM_IGroupOperations_var op =
+          geomGen->GetIGroupOperations(aStudy->StudyId());
+        if (op->_is_nil())
+          return false;
+
+        // check and add all selected GEOM objects: they must be
+        // a sub-shapes of the main GEOM and must be of one type
+        TopAbs_ShapeEnum aGroupType = TopAbs_SHAPE;
+        for ( int i =0; i < myGeomObjects->length(); i++) {
+          TopAbs_ShapeEnum aSubShapeType = (TopAbs_ShapeEnum)myGeomObjects[i]->GetShapeType();
+          if (i == 0)
+            aGroupType = aSubShapeType;
+          else if (aSubShapeType != aGroupType) {
+            aGroupType = TopAbs_SHAPE;
+            break;
+          }
+        }
+
+        GEOM::GEOM_Object_var aMeshShape = myMesh->GetShapeToMesh();
+        GEOM::GEOM_Object_var aGroupVar = op->CreateGroup(aMeshShape, aGroupType);
+        op->UnionList(aGroupVar, myGeomObjects);
+
+        if (op->IsDone()) {
+          // publish the GEOM group in study
+          QString aNewGeomGroupName ("Auto_group_for_");
+          aNewGeomGroupName += myName->text();
+          SALOMEDS::SObject_var aNewGroupSO =
+            geomGen->AddInStudy(aSMESHGen->GetCurrentStudy(), aGroupVar, aNewGeomGroupName, aMeshShape);
+        }
+
+        myGroupOnGeom = myMesh->CreateGroupFromGEOM(aType, myName->text(), aGroupVar);
+      }
+
+      int aColorNumber = myColorSpinBox->value();
+      myGroupOnGeom->SetColorNumber(aColorNumber);
+
+      _PTR(SObject) aMeshGroupSO = SMESH::FindSObject(myGroupOnGeom);
+
+      SMESH::setFileName ( aMeshGroupSO, QString::number(myColorSpinBox->value()) );
+
+      SMESH::setFileType ( aMeshGroupSO,"COULEURGROUP" );
+
       /* init for next operation */
       myName->setText("");
-      return true;
+      myColorSpinBox->setValue(0);
+      myGroupOnGeom = SMESH::SMESH_GroupOnGeom::_nil();
     }
-  
+    else { // edition
+      myGroupOnGeom->SetName(myName->text());
+
+      int aColorNumber = myColorSpinBox->value();
+      myGroupOnGeom->SetColorNumber(aColorNumber);
+    }
+
+    mySMESHGUI->updateObjBrowser(true);
+    mySelectionMgr->clearSelected();
+    return true;
+  }
+
   return false;
 }
 
@@ -645,7 +875,6 @@ void SMESHGUI_GroupDlg::onOK()
     onClose();
 }
 
-static bool busy = false;
 //=================================================================================
 // function : onListSelectionChanged()
 // purpose  : Called when selection in element list is changed
@@ -653,11 +882,11 @@ static bool busy = false;
 void SMESHGUI_GroupDlg::onListSelectionChanged()
 {
   //  MESSAGE("SMESHGUI_GroupDlg::onListSelectionChanged(); myActor = " << myActor);
-  if (busy || !myActor) return;
-  busy = true;
+  if( myIsBusy || !myActor) return;
+    myIsBusy = true;
 
   if (myCurrentLineEdit == 0) {
-    mySelection->ClearIObjects();
+    mySelectionMgr->clearSelected();
     TColStd_MapOfInteger aIndexes;
     QListBoxItem* anItem;
     for (anItem = myElements->firstItem(); anItem != 0; anItem = anItem->next()) {
@@ -666,10 +895,12 @@ void SMESHGUI_GroupDlg::onListSelectionChanged()
        aIndexes.Add(anId);
       }
     }
-    mySelection->AddOrRemoveIndex(myActor->getIO(), aIndexes, false, false);
-    mySelection->AddIObject(myActor->getIO());
+    mySelector->AddOrRemoveIndex(myActor->getIO(), aIndexes, false);
+    SALOME_ListIO aList;
+    aList.Append(myActor->getIO());
+    mySelectionMgr->setSelectedObjects(aList,false);
   }
-  busy = false;
+  myIsBusy = false;
 }
 
 //=================================================================================
@@ -678,174 +909,217 @@ void SMESHGUI_GroupDlg::onListSelectionChanged()
 //=================================================================================
 void SMESHGUI_GroupDlg::onObjectSelectionChanged()
 {
-  if (busy || !isEnabled()) return;
-  busy = true;
+  if ( myIsBusy || !isEnabled()) return;
+  if (myCurrentLineEdit == myGeomGroupLine && !myGeomGroupBtn->isOn()) return;
+
+  myIsBusy = true;
 
-  int aNbSel = mySelection->IObjectCount();
+  SALOME_ListIO aList;
+  mySelectionMgr->selectedObjects( aList );
+  
+  int aNbSel = aList.Extent();
   myElements->clearSelection();
+
   if (myCurrentLineEdit) {
-    myCurrentLineEdit->setText("") ;
+    myCurrentLineEdit->setText("");
     QString aString = "";
-    
-    if (myCurrentLineEdit == myMeshGroupLine)
-      {
-       mySelectSubMesh->setEnabled(false);
-       mySelectGroup->setEnabled(false);
-       myGroupLine->setText("");
-       mySubMeshLine->setText("");
-       
-       myGeomGroupBtn->setEnabled(false);
-       myGeomGroupLine->setEnabled(false);
-       myGeomGroupLine->setText("");
-       if (!myCreate)
-         myName->setText("");
-       
-       myElements->clear();
-
-       if(aNbSel != 1)
-         {
-           myGroup = SMESH::SMESH_Group::_nil();
-           myMesh = SMESH::SMESH_Mesh::_nil();
-           busy = false;
-           return;
-         }
-       Handle(SALOME_InteractiveObject) IO = mySelection->firstIObject();
-       
-       if (myCreate)
-         {
-           myMesh = SMESH::IObjectToInterface<SMESH::SMESH_Mesh>(IO);
-           if(myMesh->_is_nil())
-             return;
-           myGroup = SMESH::SMESH_Group::_nil();
-           
-           myActor = SMESH::FindActorByObject(myMesh);
-           SMESH::SetPickable(myActor);
-           
-           aString = mySelection->firstIObject()->getName();
-           myMeshGroupLine->setText(aString) ;
-           myMeshGroupLine->home( false );
-           
-           mySelectSubMesh->setEnabled(true);
-           mySelectGroup->setEnabled(true);
-           myGeomGroupBtn->setEnabled(true);
-           myGeomGroupLine->setEnabled(true);
-           updateButtons();
-         }
-       else
-         {
-           SMESH::SMESH_Group_var aGroup = SMESH::IObjectToInterface<SMESH::SMESH_Group>(IO);
-           if(aGroup->_is_nil())
-             return;
-           busy = false;
-           myCurrentLineEdit = 0;
-           init(aGroup);
-           busy = true;
-           mySelectSubMesh->setEnabled(true);
-           mySelectGroup->setEnabled(true);
-           myGeomGroupBtn->setEnabled(true);
-           myGeomGroupLine->setEnabled(true);
-         }
-       myCurrentLineEdit = 0;
-       busy = false;
-       if (!myCreate)
+
+    if (myCurrentLineEdit == myMeshGroupLine) {
+      mySelectSubMesh->setEnabled(false);
+      mySelectGroup->setEnabled(false);
+      myGroupLine->setText("");
+      mySubMeshLine->setText("");
+
+      myGeomGroupBtn->setEnabled(false);
+      myGeomGroupLine->setEnabled(false);
+      myGeomGroupLine->setText("");
+      myGeomObjects = new GEOM::ListOfGO();
+      myGeomObjects->length(0);
+
+      if (myGeomGroupBtn->isOn())
+       myGeomGroupBtn->setOn(false);
+      if (!myCreate)
+        myName->setText("");
+
+      myElements->clear();
+
+      if (aNbSel != 1 ) {
+        myGroup = SMESH::SMESH_Group::_nil();
+       myGroupOnGeom = SMESH::SMESH_GroupOnGeom::_nil(); 
+        myMesh = SMESH::SMESH_Mesh::_nil();
+       updateGeomPopup();
+        updateButtons();
+        myIsBusy = false;
+        return;
+      }
+      Handle(SALOME_InteractiveObject) IO = aList.First();
+
+      if (myCreate) {
+        myMesh = SMESH::IObjectToInterface<SMESH::SMESH_Mesh>(IO);
+       updateGeomPopup();
+        if (myMesh->_is_nil())
+       {
+          updateButtons();
+         myIsBusy = false;
          return;
+       }
+        myGroup = SMESH::SMESH_Group::_nil();
+
+        myActor = SMESH::FindActorByObject(myMesh);
+        SMESH::SetPickable(myActor);
+
+        aString = aList.First()->getName();
+        myMeshGroupLine->setText(aString) ;
+        myMeshGroupLine->home( false );
+
+        mySelectSubMesh->setEnabled(true);
+        mySelectGroup->setEnabled(true);
+        myGeomGroupBtn->setEnabled(true);
+        myGeomGroupLine->setEnabled(true);
+        updateButtons();
+      } else {
+        SMESH::SMESH_GroupBase_var aGroup = SMESH::IObjectToInterface<SMESH::SMESH_GroupBase>(IO);
+        if (aGroup->_is_nil())
+       {
+         myIsBusy = false;
+          return;
+       }
+        myIsBusy = false;
+        myCurrentLineEdit = 0;
 
-       if (myTypeId == -1)
-         onTypeChanged(0);
-       else
-         {
-           myElements->clear();
-           setSelectionMode(myTypeId);
-         }
+       myGroup = SMESH::SMESH_Group::_nil();
+       myGroupOnGeom = SMESH::SMESH_GroupOnGeom::_nil();
        
-       return;
+        init(aGroup);
+        myIsBusy = true;
+        mySelectSubMesh->setEnabled(true);
+        mySelectGroup->setEnabled(true);
       }
-    else if (myCurrentLineEdit == myGeomGroupLine)
-      {
-       
-       if(aNbSel != 1)
-         {
-           myGeomGroup = GEOM::GEOM_Object::_nil();
-           busy = false;
-           return;
-         }
-       
-       Standard_Boolean testResult = Standard_False;
-       myGeomGroup = GEOMBase::ConvertIOinGEOMObject(mySelection->firstIObject(), testResult );
+      myCurrentLineEdit = 0;
+      myIsBusy = false;
+      if (!myCreate)
+        return;
+
+      if (myGrpTypeId == 0)
+       {
+         if (myTypeId == -1)
+           onTypeChanged(0);
+         else
+           {
+             myElements->clear();
+             setSelectionMode(myTypeId);
+           }
+       }
+
+      myIsBusy = false;
+      return;
+
+    } else if (myCurrentLineEdit == myGeomGroupLine) {
+
+      myGeomObjects = new GEOM::ListOfGO();
+
+      // The mesh SObject
+      _PTR(SObject) aMeshSO = SMESH::FindSObject(myMesh);
+
+      if (aNbSel == 0 || !aMeshSO)
+       {
+         myGeomObjects->length(0);
+          updateButtons();
+         myIsBusy = false;
+         return;
+       }
+
+      myGeomObjects->length(aNbSel);
+
+      GEOM::GEOM_Object_var aGeomGroup;
+      Standard_Boolean testResult;
+      int i = 0;
+      
+      SALOME_ListIteratorOfListIO anIt (aList);
+      for (; anIt.More(); anIt.Next()) {
        
+       testResult = Standard_False;
+       aGeomGroup = GEOMBase::ConvertIOinGEOMObject(anIt.Value(), testResult);
+
        // Check if the object is a geometry group
-       if(!testResult || CORBA::is_nil( myGeomGroup ))
-         {
-           myGeomGroup = GEOM::GEOM_Object::_nil();
-           busy = false;
-           return;
-         }
+       if (!testResult || CORBA::is_nil(aGeomGroup))
+         continue;
+       
+
        // Check if group constructed on the same shape as a mesh or on its child
-       SALOMEDS::Study_var aStudy = SMESH::GetActiveStudyDocument();
-       GEOM::GEOM_IGroupOperations_var anOp = SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
-       // The main shape of the group 
+       _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+       GEOM::GEOM_IGroupOperations_var anOp =
+         SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
+
+       // The main shape of the group
        GEOM::GEOM_Object_var aGroupMainShape;
-       if( myGeomGroup->GetType() == 37 ) 
-         aGroupMainShape = anOp->GetMainShape( myGeomGroup );
+       if (aGeomGroup->GetType() == 37)
+         aGroupMainShape = anOp->GetMainShape(aGeomGroup);
        else
-         aGroupMainShape = GEOM::GEOM_Object::_duplicate(myGeomGroup);
-       SALOMEDS::SObject_var aGroupMainShapeSO = aStudy->FindObjectIOR( aStudy->ConvertObjectToIOR(aGroupMainShape) );
-       // The mesh SObject
-       SALOMEDS::SObject_var aMeshSO = aStudy->FindObjectIOR( aStudy->ConvertObjectToIOR(myMesh) );
+         aGroupMainShape = GEOM::GEOM_Object::_duplicate(aGeomGroup);
+       _PTR(SObject) aGroupMainShapeSO =
+         //aStudy->FindObjectIOR(aStudy->ConvertObjectToIOR(aGroupMainShape));
+         aStudy->FindObjectID(aGroupMainShape->GetStudyEntry());
        
-       SALOMEDS::SObject_var anObj, aRef;
+       _PTR(SObject) anObj, aRef;
        bool isRefOrSubShape = false;
-       if ( aMeshSO->FindSubObject( 1, anObj ) &&  anObj->ReferencedObject( aRef )) {
-         if ( strcmp( aRef->GetID(), aGroupMainShapeSO->GetID() ) == 0 )
+       if (aMeshSO->FindSubObject(1, anObj) &&  anObj->ReferencedObject(aRef)) {
+         //if (strcmp(aRef->GetID(), aGroupMainShapeSO->GetID()) == 0) {
+         if (aRef->GetID() == aGroupMainShapeSO->GetID()) {
            isRefOrSubShape = true;
-         else
-           {
-             SALOMEDS::SObject_var aFather = aGroupMainShapeSO->GetFather();
-             SALOMEDS::SComponent_var aComponent = aGroupMainShapeSO->GetFatherComponent();
-             while ( !isRefOrSubShape && strcmp( aFather->GetID(), aComponent->GetID() ) != 0 )
-               {
-                 if (strcmp( aRef->GetID(), aFather->GetID() ) == 0)
-                   isRefOrSubShape = true;
-                 else
-                   aFather = aFather->GetFather();
-               }
+         } else {
+           _PTR(SObject) aFather = aGroupMainShapeSO->GetFather();
+           _PTR(SComponent) aComponent = aGroupMainShapeSO->GetFatherComponent();
+           //while (!isRefOrSubShape && strcmp(aFather->GetID(), aComponent->GetID()) != 0) {
+           while (!isRefOrSubShape && aFather->GetID() != aComponent->GetID()) {
+             //if (strcmp(aRef->GetID(), aFather->GetID()) == 0)
+             if (aRef->GetID() == aFather->GetID())
+               isRefOrSubShape = true;
+             else
+               aFather = aFather->GetFather();
            }
-       }
-       if ( !isRefOrSubShape ) 
-         {
-           myGeomGroup = GEOM::GEOM_Object::_nil();
-           busy = false;
-           return;
          }
+       }
+       if (isRefOrSubShape)
+         myGeomObjects[i++] = aGeomGroup;
       }
-    
-    if (aNbSel >= 1) {
-      if (aNbSel > 1) {
-       if (myCurrentLineEdit == mySubMeshLine)
+      
+      myGeomObjects->length(i);
+      if ( i == 0 )
+       {
+         myIsBusy = false;
+         return;
+       }
+      
+      aNbSel = i;
+    }
+
+    if(aNbSel >= 1) {
+      if(aNbSel > 1) {
+       if(myCurrentLineEdit == mySubMeshLine)
          aString = tr("SMESH_SUBMESH_SELECTED").arg(aNbSel);
-       else if (myCurrentLineEdit == myGroupLine || myCurrentLineEdit == myGeomGroupLine)
+       else if(myCurrentLineEdit == myGroupLine)
          aString = tr("SMESH_GROUP_SELECTED").arg(aNbSel);
-      }
-      else {
-       aString = mySelection->firstIObject()->getName();
+       else if(myCurrentLineEdit == myGeomGroupLine)
+         aString = tr("%1 Objects").arg(aNbSel);
+      } else {
+       aString = aList.First()->getName();
       }
     }
-    
-    myCurrentLineEdit->setText(aString) ;
-    myCurrentLineEdit->home( false );
-    
+
+    myCurrentLineEdit->setText(aString);
+    myCurrentLineEdit->home(false);
+
     updateButtons();
-  }
-  else {
-    if (aNbSel == 1) {
+
+  else {
+    if (aNbSel == 1 && myActor ) {
       QString aListStr = "";
       int aNbItems = 0;
       if (myTypeId == 0) {
-       aNbItems = SMESH::GetNameOfSelectedNodes(mySelection, aListStr);
-      }
-      else {
-       aNbItems = SMESH::GetNameOfSelectedElements(mySelection, aListStr);
+       aNbItems = SMESH::GetNameOfSelectedNodes(mySelector, myActor->getIO(), aListStr);
+      } else {
+       aNbItems = SMESH::GetNameOfSelectedElements(mySelector, myActor->getIO(), aListStr);
       }
       if (aNbItems > 0) {
        QStringList anElements = QStringList::split(" ", aListStr);
@@ -857,17 +1131,18 @@ void SMESHGUI_GroupDlg::onObjectSelectionChanged()
       }
     }
   }
-  
-  if ( !myActor ) {
-    if ( !myGroup->_is_nil() )
+
+  if (!myActor) {
+    if (!myGroup->_is_nil())
       myActor = SMESH::FindActorByObject(myGroup);
+    else if(!myGroupOnGeom->_is_nil())
+      myActor = SMESH::FindActorByObject(myGroupOnGeom);
     else
       myActor = SMESH::FindActorByObject(myMesh);
   }
-  
-  busy = false;
-}
 
+  myIsBusy = false;
+}
 
 //=================================================================================
 // function : onSelectSubMesh()
@@ -878,7 +1153,7 @@ void SMESHGUI_GroupDlg::onSelectSubMesh(bool on)
   if (on) {
     if (mySelectGroup->isChecked()) {
       mySelectGroup->setChecked(false);
-    } 
+    }
     //VSR: else if (mySelectGeomGroup->isChecked()) {
     //VSR:   mySelectGeomGroup->setChecked(false);
     //VSR: }
@@ -934,9 +1209,12 @@ void SMESHGUI_GroupDlg::onSelectGeomGroup(bool on)
       mySelectGroup->setChecked(false);
     }
     myCurrentLineEdit = myGeomGroupLine;
-    setSelectionMode(7);
+    updateGeomPopup();
+    setSelectionMode(8);
   }
   else {
+    myGeomGroupBtn->setOn(false);
+    myGeomObjects->length(0);
     myGeomGroupLine->setText("");
     myCurrentLineEdit = 0;
     if (myTypeId != -1)
@@ -944,6 +1222,17 @@ void SMESHGUI_GroupDlg::onSelectGeomGroup(bool on)
   }
 }
 
+//=================================================================================
+// function : (onSelectColorGroup)
+// purpose  : Called when setting a color on group
+//=================================================================================
+void SMESHGUI_GroupDlg::onSelectColorGroup(bool on)
+{
+  if (!on)
+    myColorSpinBox->setValue(0);
+  
+  myColorSpinBox->setEnabled(on);
+}
 
 //=================================================================================
 // function : setCurrentSelection()
@@ -969,17 +1258,12 @@ void SMESHGUI_GroupDlg::setCurrentSelection()
     myCurrentLineEdit = myGroupLine;
     onObjectSelectionChanged();
   }
-  else if (send == myGeomGroupBtn) {
-    myCurrentLineEdit = myGeomGroupLine;
-    setSelectionMode(7);
-    onObjectSelectionChanged();
-  }
 }
 
 
 //=================================================================================
 // function : setFilters()
-// purpose  : SLOT. Called when "Filter" button pressed. 
+// purpose  : SLOT. Called when "Filter" button pressed.
 //=================================================================================
 void SMESHGUI_GroupDlg::setFilters()
 {
@@ -995,13 +1279,13 @@ void SMESHGUI_GroupDlg::setFilters()
 
   if ( myFilterDlg == 0 )
   {
-    myFilterDlg = new SMESHGUI_FilterDlg( (QWidget*)parent(), aType );
+    myFilterDlg = new SMESHGUI_FilterDlg( mySMESHGUI, aType );
     connect( myFilterDlg, SIGNAL( Accepted() ), SLOT( onFilterAccepted() ) );
   }
   else
     myFilterDlg->Init( aType );
 
-  myFilterDlg->SetSelection( mySelection );
+  myFilterDlg->SetSelection();
   myFilterDlg->SetMesh( myMesh );
   myFilterDlg->SetSourceWg( myElements );
 
@@ -1029,28 +1313,47 @@ void SMESHGUI_GroupDlg::onFilterAccepted()
 //=================================================================================
 void SMESHGUI_GroupDlg::onAdd()
 {
-  int aNbSel = mySelection->IObjectCount();
+  SALOME_ListIO aList;
+  mySelectionMgr->selectedObjects( aList );
+
+  int aNbSel = aList.Extent();
+
   if (aNbSel == 0 || !myActor || myMesh->_is_nil()) return;
 
-  busy = true;
+  myIsBusy = true;
 
   SMESH::ElementType aType = SMESH::ALL;
   switch(myTypeId) {
-  case 0: aType = SMESH::NODE; break;
-  case 1: aType = SMESH::EDGE; break;
-  case 2: aType = SMESH::FACE; break;
-  case 3: aType = SMESH::VOLUME; break;
+  case 0: 
+    aType = SMESH::NODE; 
+    mySelector->SetSelectionMode(NodeSelection);
+    break;
+  case 1: 
+    aType = SMESH::EDGE; 
+    mySelector->SetSelectionMode(EdgeSelection);
+    break;
+  case 2: 
+    aType = SMESH::FACE; 
+    mySelector->SetSelectionMode(FaceSelection);
+    break;
+  case 3: 
+    aType = SMESH::VOLUME; 
+    mySelector->SetSelectionMode(VolumeSelection);
+    break;
+  default:
+    mySelector->SetSelectionMode(ActorSelection);
   }
 
+
   if (myCurrentLineEdit == 0) {
-    //if (aNbSel != 1) { busy = false; return; }
+    //if (aNbSel != 1) { myIsBusy = false; return; }
     QString aListStr = "";
     int aNbItems = 0;
     if (myTypeId == 0) {
-      aNbItems = SMESH::GetNameOfSelectedNodes(mySelection, myActor->getIO(), aListStr);
+      aNbItems = SMESH::GetNameOfSelectedNodes(mySelector, myActor->getIO(), aListStr);
     }
     else {
-      aNbItems = SMESH::GetNameOfSelectedElements(mySelection, myActor->getIO(), aListStr);
+      aNbItems = SMESH::GetNameOfSelectedElements(mySelector, myActor->getIO(), aListStr);
     }
     if (aNbItems > 0) {
       QStringList anElements = QStringList::split(" ", aListStr);
@@ -1064,16 +1367,21 @@ void SMESHGUI_GroupDlg::onAdd()
        myElements->setSelected(anItem, true);
       }
     }
-  }
-  else if (myCurrentLineEdit == mySubMeshLine) {
-    SALOME_ListIteratorOfListIO anIt(mySelection->StoredIObjects());
+  } else if (myCurrentLineEdit == mySubMeshLine) {
+    //SALOME_ListIteratorOfListIO anIt (mySelectionMgr->StoredIObjects());
+    
+    SALOME_ListIO aList;
+    mySelectionMgr->selectedObjects( aList );
+
+    SALOME_ListIteratorOfListIO anIt (aList);
     for (; anIt.More(); anIt.Next()) {
-      SMESH::SMESH_subMesh_var aSubMesh = SMESH::IObjectToInterface<SMESH::SMESH_subMesh>(anIt.Value());
+      SMESH::SMESH_subMesh_var aSubMesh =
+        SMESH::IObjectToInterface<SMESH::SMESH_subMesh>(anIt.Value());
       if (!aSubMesh->_is_nil()) {
        // check if mesh is the same
        if (aSubMesh->GetFather()->GetId() == myMesh->GetId()) {
           try {
-            SMESH::long_array_var anElements = aSubMesh->GetElementsByType ( aType );
+            SMESH::long_array_var anElements = aSubMesh->GetElementsByType(aType);
             int k = anElements->length();
             QListBoxItem* anItem = 0;
             for (int i = 0; i < k; i++) {
@@ -1087,19 +1395,24 @@ void SMESHGUI_GroupDlg::onAdd()
             }
           }
           catch (const SALOME::SALOME_Exception& ex) {
-            QtCatchCorbaException(ex);
+            SalomeApp_Tools::QtCatchCorbaException(ex);
           }
         }
       }
     }
     mySelectSubMesh->setChecked(false);
-    busy = false;
+    myIsBusy = false;
     onListSelectionChanged();
-  }
-  else if (myCurrentLineEdit == myGroupLine) {
-    SALOME_ListIteratorOfListIO anIt(mySelection->StoredIObjects());
+
+  } else if (myCurrentLineEdit == myGroupLine) {
+    //SALOME_ListIteratorOfListIO anIt (mySelectionMgr->StoredIObjects());
+    SALOME_ListIO aList;
+    mySelectionMgr->selectedObjects( aList );
+    
+    SALOME_ListIteratorOfListIO anIt (aList);
     for (; anIt.More(); anIt.Next()) {
-      SMESH::SMESH_Group_var aGroup = SMESH::IObjectToInterface<SMESH::SMESH_Group>(anIt.Value());
+      SMESH::SMESH_Group_var aGroup =
+        SMESH::IObjectToInterface<SMESH::SMESH_Group>(anIt.Value());
       if (!aGroup->_is_nil()) {
        // check if mesh is the same
        if (aGroup->GetType() == aType && aGroup->GetMesh()->GetId() == myMesh->GetId()) {
@@ -1119,36 +1432,38 @@ void SMESHGUI_GroupDlg::onAdd()
       }
     }
     mySelectGroup->setChecked(false);
-    busy = false;
+    myIsBusy = false;
     onListSelectionChanged();
-  }
-  else if (myCurrentLineEdit == myGeomGroupLine && !CORBA::is_nil(myGeomGroup)) {
-    
-    SALOMEDS::Study_var aStudy = SMESH::GetActiveStudyDocument();
-    GEOM::GEOM_IGroupOperations_var aGroupOp = SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
-    
+
+  } else if (myCurrentLineEdit == myGeomGroupLine && myGeomObjects->length() == 1) {
+    _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+    GEOM::GEOM_IGroupOperations_var aGroupOp =
+      SMESH::GetGEOMGen()->GetIGroupOperations(aStudy->StudyId());
+
     SMESH::ElementType aGroupType = SMESH::ALL;
-    switch(aGroupOp->GetType(myGeomGroup)) {
+    switch(aGroupOp->GetType(myGeomObjects[0])) {
     case 7: aGroupType = SMESH::NODE; break;
     case 6: aGroupType = SMESH::EDGE; break;
     case 4: aGroupType = SMESH::FACE; break;
     case 2: aGroupType = SMESH::VOLUME; break;
-    default: return;
+    default: myIsBusy = false; return;
     }
-    
+
     if (aGroupType == aType) {
-      SALOMEDS::SObject_var aGroupSO = aStudy->FindObjectIOR( aStudy->ConvertObjectToIOR(myGeomGroup) );
+      _PTR(SObject) aGroupSO =
+        //aStudy->FindObjectIOR(aStudy->ConvertObjectToIOR(myGeomGroup));
+        aStudy->FindObjectID(myGeomObjects[0]->GetStudyEntry());
       // Construct filter
       SMESH::FilterManager_var aFilterMgr = SMESH::GetFilterManager();
       SMESH::Filter_var aFilter = aFilterMgr->CreateFilter();
       SMESH::BelongToGeom_var aBelongToGeom = aFilterMgr->CreateBelongToGeom();;
-      aBelongToGeom->SetGeom(myGeomGroup);
-      aBelongToGeom->SetShapeName(aGroupSO->GetName());
+      aBelongToGeom->SetGeom(myGeomObjects[0]);
+      aBelongToGeom->SetShapeName(aGroupSO->GetName().c_str());
       aBelongToGeom->SetElementType(aType);
-      aFilter->SetPredicate( aBelongToGeom );
-      
-      SMESH::long_array_var anElements = aFilter->GetElementsId( myMesh );
-      
+      aFilter->SetPredicate(aBelongToGeom);
+
+      SMESH::long_array_var anElements = aFilter->GetElementsId(myMesh);
+
       int k = anElements->length();
       QListBoxItem* anItem = 0;
       for (int i = 0; i < k; i++) {
@@ -1161,13 +1476,13 @@ void SMESHGUI_GroupDlg::onAdd()
        myElements->setSelected(anItem, true);
       }
     }
-    
+
     //VSR: mySelectGeomGroup->setChecked(false);
-    busy = false;
+    myIsBusy = false;
     onListSelectionChanged();
   }
-  busy = false;
-  //  mySelection->ClearIObjects();
+  myIsBusy = false;
+  //  mySelectionMgr->clearSelected();
   updateButtons();
 }
 
@@ -1177,18 +1492,21 @@ void SMESHGUI_GroupDlg::onAdd()
 //=================================================================================
 void SMESHGUI_GroupDlg::onRemove()
 {
-  busy = true;
+  myIsBusy = true;
   if (myCurrentLineEdit == 0) {
     for (int i = myElements->count(); i > 0; i--) {
       if (myElements->isSelected(i-1)) {
        myElements->removeItem(i-1);
       }
     }
-  }
-  else {
-    int aNbSel = mySelection->IObjectCount();
-    if (aNbSel == 0) { busy = false; return; }
-    
+  } else {
+    SALOME_ListIO aList;
+    mySelectionMgr->selectedObjects( aList );
+
+    int aNbSel = aList.Extent();
+
+    if (aNbSel == 0) { myIsBusy = false; return; }
+
     SMESH::ElementType aType = SMESH::ALL;
     switch(myTypeId) {
     case 0: aType = SMESH::NODE; break;
@@ -1198,7 +1516,11 @@ void SMESHGUI_GroupDlg::onRemove()
     }
 
     if (myCurrentLineEdit == mySubMeshLine) {
-      SALOME_ListIteratorOfListIO anIt(mySelection->StoredIObjects());
+      //SALOME_ListIteratorOfListIO anIt (mySelectionMgr->StoredIObjects());
+      SALOME_ListIO aList;
+      mySelectionMgr->selectedObjects( aList );
+
+      SALOME_ListIteratorOfListIO anIt (aList);
       for (; anIt.More(); anIt.Next()) {
        SMESH::SMESH_subMesh_var aSubMesh = SMESH::IObjectToInterface<SMESH::SMESH_subMesh>(anIt.Value());
        if (!aSubMesh->_is_nil()) {
@@ -1215,7 +1537,7 @@ void SMESHGUI_GroupDlg::onRemove()
                }
              }
              catch (const SALOME::SALOME_Exception& ex) {
-               QtCatchCorbaException(ex);
+               SalomeApp_Tools::QtCatchCorbaException(ex);
              }
            }
            else {
@@ -1229,7 +1551,7 @@ void SMESHGUI_GroupDlg::onRemove()
                }
              }
              catch (const SALOME::SALOME_Exception& ex) {
-               QtCatchCorbaException(ex);
+               SalomeApp_Tools::QtCatchCorbaException(ex);
              }
            }
          }
@@ -1238,7 +1560,11 @@ void SMESHGUI_GroupDlg::onRemove()
     }
     else if (myCurrentLineEdit == myGroupLine) {
       Standard_Boolean aRes;
-      SALOME_ListIteratorOfListIO anIt(mySelection->StoredIObjects());
+      //SALOME_ListIteratorOfListIO anIt (mySelectionMgr->StoredIObjects());
+      SALOME_ListIO aList;
+      mySelectionMgr->selectedObjects( aList );
+
+      SALOME_ListIteratorOfListIO anIt (aList);
       for (; anIt.More(); anIt.Next()) {
        SMESH::SMESH_Group_var aGroup = SMESH::IObjectToInterface<SMESH::SMESH_Group>(anIt.Value());
        if (aRes && !aGroup->_is_nil()) {
@@ -1256,7 +1582,7 @@ void SMESHGUI_GroupDlg::onRemove()
       }
     }
   }
-  busy = false;
+  myIsBusy = false;
   updateButtons();
 }
 
@@ -1271,7 +1597,7 @@ void SMESHGUI_GroupDlg::onSort()
   // myElements->update();
   int i, k = myElements->count();
   if (k > 0) {
-    busy = true;
+    myIsBusy = true;
     QStringList aSelected;
     std::vector<int> anArray(k);
     //    QMemArray<int> anArray(k);
@@ -1279,7 +1605,7 @@ void SMESHGUI_GroupDlg::onSort()
     // fill the array
     for (anItem = myElements->firstItem(), i = 0; anItem != 0; anItem = anItem->next(), i++) {
       anArray[i] = anItem->text().toInt();
-      if (anItem->isSelected()) 
+      if (anItem->isSelected())
        aSelected.append(anItem->text());
     }
     // sort & update list
@@ -1293,7 +1619,7 @@ void SMESHGUI_GroupDlg::onSort()
       anItem = myElements->findItem(*it, Qt::ExactMatch);
       if (anItem) myElements->setSelected(anItem, true);
     }
-    busy = false;
+    myIsBusy = false;
   }
 }
 
@@ -1301,67 +1627,224 @@ void SMESHGUI_GroupDlg::onSort()
 // function : closeEvent()
 // purpose  :
 //=================================================================================
-void SMESHGUI_GroupDlg::closeEvent( QCloseEvent* e )
+void SMESHGUI_GroupDlg::closeEvent (QCloseEvent*)
 {
   onClose();
 }
 
-//=======================================================================
-// name    : SMESHGUI_GroupDlg::onClose
-// Purpose : SLOT called when "Close" button pressed. Close dialog
-//=======================================================================
+//=================================================================================
+// function : SMESHGUI_GroupDlg::onClose
+// purpose  : SLOT called when "Close" button pressed. Close dialog
+//=================================================================================
 void SMESHGUI_GroupDlg::onClose()
 {
-  QAD_StudyFrame* aStudyFrame = mySMESHGUI->GetActiveStudy()->getActiveStudyFrame();
-  if (aStudyFrame->getTypeView() == VIEW_VTK) {
+  if (SMESH::GetCurrentVtkView()) {
+    SMESH::RemoveFilters(); // PAL6938 -- clean all mesh entity filters
     SMESH::SetPointRepresentation(false);
     SMESH::SetPickable();
-
-    // remove filters from viewer
-    if(VTKViewer_InteractorStyleSALOME* aStyle = SMESH::GetInteractorStyle()){
-      SMESH::RemoveFilter(SMESHGUI_EdgeFilter,aStyle);
-      SMESH::RemoveFilter(SMESHGUI_FaceFilter,aStyle);
-    }
   }
-  
-  mySelection->ClearIObjects();
-  QAD_Application::getDesktop()->SetSelectionMode(ActorSelection);
-  mySelection->ClearFilters();
+
+  mySelectionMgr->clearSelected();
+  if ( SVTK_ViewWindow* aViewWindow = SMESH::GetViewWindow( mySMESHGUI ))
+    aViewWindow->SetSelectionMode(ActorSelection);
+  mySelectionMgr->clearFilters();
   mySMESHGUI->ResetState();
 
   reject();
 }
 
-//=======================================================================
-// name    : SMESHGUI_GroupDlg::onDeactivate
-// Purpose : SLOT called when dialog must be deativated
-//=======================================================================
+//=================================================================================
+// function : onHelp()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::onHelp()
+{
+  LightApp_Application* app = (LightApp_Application*)(SUIT_Session::session()->activeApplication());
+  if (app) 
+    app->onHelpContextModule(mySMESHGUI ? app->moduleName(mySMESHGUI->moduleName()) : QString(""), myHelpFileName);
+  else {
+    SUIT_MessageBox::warn1(0, QObject::tr("WRN_WARNING"),
+                          QObject::tr("EXTERNAL_BROWSER_CANNOT_SHOW_PAGE").
+                          arg(app->resourceMgr()->stringValue("ExternalBrowser", "application")).arg(myHelpFileName),
+                          QObject::tr("BUT_OK"));
+  }
+}
+
+//=================================================================================
+// function : SMESHGUI_GroupDlg::onDeactivate
+// purpose  : SLOT called when dialog must be deativated
+//=================================================================================
 void SMESHGUI_GroupDlg::onDeactivate()
 {
-  setEnabled( false );
+  mySMESHGUI->ResetState();
+  setEnabled(false);
 }
 
-//=======================================================================
-// name    : SMESHGUI_GroupDlg::enterEvent
-// Purpose : Event filter
-//=======================================================================
-void SMESHGUI_GroupDlg::enterEvent( QEvent* )
+//=================================================================================
+// function : SMESHGUI_GroupDlg::enterEvent
+// purpose  : Event filter
+//=================================================================================
+void SMESHGUI_GroupDlg::enterEvent (QEvent*)
 {
-  if ( !isEnabled() ) {
-    SMESHGUI::GetSMESHGUI()->EmitSignalDeactivateDialog();
-    setEnabled( true );
+  if (!isEnabled()) {
+    mySMESHGUI->EmitSignalDeactivateDialog();
+    setEnabled(true);
     mySelectionMode = -1;
-    setSelectionMode( myTypeId );
+    setSelectionMode(myTypeId);
+    //mySMESHGUI->SetActiveDialogBox((QDialog*)this);
+    mySMESHGUI->SetActiveDialogBox(this);
+    mySMESHGUI->SetState(800);
   }
 }
 
-//=======================================================================
-//function : hideEvent
-//purpose  : caused by ESC key
-//=======================================================================
-
-void SMESHGUI_GroupDlg::hideEvent ( QHideEvent * e )
+//=================================================================================
+// function : hideEvent
+// purpose  : caused by ESC key
+//=================================================================================
+void SMESHGUI_GroupDlg::hideEvent (QHideEvent*)
 {
-  if ( !isMinimized() )
+  if (!isMinimized() && !myIsBusy)
     onClose();
 }
+
+//=================================================================================
+// function : keyPressEvent()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::keyPressEvent( QKeyEvent* e )
+{
+  QDialog::keyPressEvent( e );
+  if ( e->isAccepted() )
+    return;
+
+  if ( e->key() == Key_F1 )
+    {
+      e->accept();
+      onHelp();
+    }
+}
+
+//================================================================================
+/*!
+ * \brief Enable showing of the popup when Geometry selection btn is clicked
+  * \param enable - true to enable
+ */
+//================================================================================
+
+enum { DIRECT_GEOM_INDEX = 0, GEOM_BY_MESH_INDEX };
+
+void SMESHGUI_GroupDlg::updateGeomPopup()
+{
+  bool enable = false;
+
+  if ( !myMesh->_is_nil() )
+    enable = myMesh->NbEdges() > 0;
+
+  if ( myGeomGroupBtn )
+  {
+    disconnect( myGeomGroupBtn, SIGNAL( toggled(bool) ), this, SLOT( onGeomSelectionButton(bool) ));
+    if ( enable ) {
+      if ( !myGeomPopup ) {
+        myGeomPopup = new QPopupMenu();
+        myGeomPopup->insertItem( tr("DIRECT_GEOM_SELECTION"), DIRECT_GEOM_INDEX );
+        myGeomPopup->insertItem( tr("GEOM_BY_MESH_ELEM_SELECTION"), GEOM_BY_MESH_INDEX );
+        connect( myGeomPopup, SIGNAL( activated( int ) ), SLOT( onGeomPopup( int ) ) );
+      }
+      connect( myGeomGroupBtn, SIGNAL( toggled(bool) ), this, SLOT( onGeomSelectionButton(bool) ));
+    }
+  }
+}
+
+
+//=================================================================================
+// function : onGeomSelectionButton()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::onGeomSelectionButton(bool isBtnOn)
+{
+  if ( myGeomPopup && isBtnOn )
+    {
+      myCurrentLineEdit = myGeomGroupLine;
+      int id = myGeomPopup->exec( QCursor::pos() );
+      if (id == DIRECT_GEOM_INDEX || id == -1)
+       setSelectionMode(7);
+    }
+  else if (!isBtnOn)
+    {
+      myCurrentLineEdit = 0;
+      setSelectionMode(8);
+    }
+}
+
+//=================================================================================
+// function : onGeomPopup()
+// purpose  :
+//=================================================================================
+void SMESHGUI_GroupDlg::onGeomPopup( int index )
+{
+  if ( index == GEOM_BY_MESH_INDEX )
+    {
+      mySelectionMode = -1;
+      if ( !myShapeByMeshOp ) {
+       myShapeByMeshOp = new SMESHGUI_ShapeByMeshOp(true);
+       connect(myShapeByMeshOp, SIGNAL(committed(SUIT_Operation*)),
+               SLOT(onPublishShapeByMeshDlg(SUIT_Operation*)));
+       connect(myShapeByMeshOp, SIGNAL(aborted(SUIT_Operation*)),
+               SLOT(onCloseShapeByMeshDlg(SUIT_Operation*)));
+      }
+      // set mesh object to SMESHGUI_ShapeByMeshOp and start it
+      if ( !myMesh->_is_nil() ) {
+       myIsBusy = true;
+        hide(); // stop processing selection
+       myIsBusy = false;
+        myShapeByMeshOp->setModule( mySMESHGUI );
+        myShapeByMeshOp->setStudy( 0 ); // it's really necessary
+        myShapeByMeshOp->SetMesh( myMesh );
+        myShapeByMeshOp->start();
+      }
+    }
+}
+
+//================================================================================
+/*!
+ * \brief SLOT. Is called when Ok is pressed in SMESHGUI_ShapeByMeshDlg
+ */
+//================================================================================
+
+void SMESHGUI_GroupDlg::onPublishShapeByMeshDlg(SUIT_Operation* op)
+{
+  if ( myShapeByMeshOp == op ) {
+    mySMESHGUI->getApp()->updateObjectBrowser();
+    show();
+    // Select a found geometry object
+    GEOM::GEOM_Object_var aGeomVar = myShapeByMeshOp->GetShape();
+    if ( !aGeomVar->_is_nil() )
+    {
+      QString ID = aGeomVar->GetStudyEntry();
+      _PTR(Study) aStudy = SMESH::GetActiveStudyDocument();
+      if ( _PTR(SObject) aGeomSO = aStudy->FindObjectID( ID.latin1() )) {
+       SALOME_ListIO anIOList;
+       Handle(SALOME_InteractiveObject) anIO = new SALOME_InteractiveObject
+         ( aGeomSO->GetID().c_str(), "SMESH", aGeomSO->GetName().c_str() );
+       anIOList.Append( anIO );
+       mySelectionMgr->setSelectedObjects( anIOList, false );
+       onObjectSelectionChanged();
+      }
+    }
+  }
+}
+
+//================================================================================
+/*!
+ * \brief SLOT. Is called when Close is pressed in SMESHGUI_ShapeByMeshDlg
+ */
+//================================================================================
+
+void SMESHGUI_GroupDlg::onCloseShapeByMeshDlg(SUIT_Operation* op)
+{
+  if ( myShapeByMeshOp == op )
+    {
+      show();
+      setSelectionMode(7);
+    }
+}