src/IGESSelect/IGESSelect_SelectBypassGroup.cxx

   1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
   2 //
   3 // This file is part of Open CASCADE Technology software library.
   4 //
   5 // This library is free software; you can redistribute it and/or modify it under
   6 // the terms of the GNU Lesser General Public License version 2.1 as published
   7 // by the Free Software Foundation, with special exception defined in the file
   8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
   9 // distribution for complete text of the license and disclaimer of any warranty.
  10 //
  11 // Alternatively, this file may be used under the terms of Open CASCADE
  12 // commercial license or contractual agreement.
  13
  14
  15 #include <IGESBasic_Group.hxx>
  16 #include <IGESBasic_GroupWithoutBackP.hxx>
  17 #include <IGESBasic_OrderedGroup.hxx>
  18 #include <IGESBasic_OrderedGroupWithoutBackP.hxx>
  19 #include <IGESData_IGESEntity.hxx>
  20 #include <IGESSelect_SelectBypassGroup.hxx>
  21 #include <Interface_EntityIterator.hxx>
  22 #include <Interface_Graph.hxx>
  23 #include <Interface_InterfaceError.hxx>
  24 #include <Interface_Macros.hxx>
  25 #include <Standard_Transient.hxx>
  26 #include <Standard_Type.hxx>
  27 #include <TCollection_AsciiString.hxx>
  28
  29 IMPLEMENT_STANDARD_RTTIEXT(IGESSelect_SelectBypassGroup,IFSelect_SelectExplore)
  30
  31 #define TypePourGroup 402
  32
  33
  34 IGESSelect_SelectBypassGroup::IGESSelect_SelectBypassGroup
  35   (const Standard_Integer level)
  36   : IFSelect_SelectExplore (level)    {  }
  37
  38
  39     Standard_Boolean  IGESSelect_SelectBypassGroup::Explore
  40   (const Standard_Integer /*level*/, const Handle(Standard_Transient)& ent,
  41    const Interface_Graph& /*G*/,  Interface_EntityIterator& explored) const
  42 {
  43   DeclareAndCast(IGESBasic_Group,gr,ent);    // Group les regroupe tous
  44   if (gr.IsNull()) return Standard_True;
  45
  46   Standard_Integer i, nb = gr->NbEntities();
  47   for (i = 1; i <= nb; i ++)  explored.AddItem (gr->Entity(i));
  48   return Standard_True;
  49 }
  50
  51
  52     TCollection_AsciiString IGESSelect_SelectBypassGroup::ExploreLabel () const
  53       {  return TCollection_AsciiString ("Content of Groups");  }