Body (Object)

The object that manages a sequence of shapes, a set of sketches, a set of hybrid bodies, a set of ordered geometrical sets and a set of hybrid shapes.

It belongs to the collection of a or object.

Properties


Property HybridBodies() As (Read Only)
Returns the body's HybridBodies collection.
Example:
The following example returns in hybridBodyColl the collection of hybrid bodies of the main body of partDoc part document: 
 Dim body As Body
 Set body = partDoc.Part.Bodies.MainBody
 Set hybridBodyColl = body.HybridBodies
Property HybridShapes() As (Read Only)
Returns the list of hybrid shapes included in the body.
Returns:
oHybridShapes The list of hybrid shapes in the body (@see CATIAHybridShapes
for more information).
Example:
The following example returns in HybridShapes1 the list of
hybrid shapes in the body Body1: 
 Dim HybridShapes1 As HybridShapes
 Set HybridShapes1 = Body1.HybridShapes
Property InBooleanOperation() As (Read Only)
Returns True if the body is involved in a boolean operation, else returns False.
Example:
The following example returns in operated True if the body body1belongs to a boolean operation. 
 operated = body1.InBooleanOperation
Property OrderedGeometricalSets() As (Read Only)
Returns the body's OrderedGeometricalSets collection.
ometricalSetColl = Body1.OrderedGeometricalSets Example:
The following example returns in OrderedGeometricalSetColl the collection of ordered geometrical set of the body Body1 : 
 Set OrderedGe
Property Shapes() As (Read Only)
Returns the body's Shapes collection. These shapes make up the sequence of shapes that will produce an intermediate result for the part, or the final result in the case of the main body.
Example:
The following example returns in shapColl the collection of shapes managed by the main body of the partDoc part document: 
 Dim body As Body
 Set body = partDoc.Part.Bodies.MainBody
 Set shapColl = body.Shapes
Property Sketches() As (Read Only)
Returns the body's Sketches collection. These sketches are those inside the body at all levels.
Example:
The following example returns in skColl the collection of sketches of the main body of partDoc part document: 
 Dim body As Body
 Set body = partDoc.Part.Bodies.MainBody
 Set skColl = body.Sketches

Methods


Sub InsertHybridShape( iHybridShape)
Insert a hybrid shape to the body.
Parameters:
iHybriShape
The hybrid shape to insert.
Example:
This example inserts the hybrid shape HybridShape1 to the body Body1: 
 Body1.InsertHybridShape (HybridShape1)