I'm not sure what you mean by getting a surface body and what you want to do with it. But it is possible to create a new feature with all the geometry of a surface body. have a look at this example:
Dim doc As PartDocument = ThisDoc.Document Dim body As SurfaceBody = doc.ComponentDefinition.SurfaceBodies.Item(1) Dim nonParamFeatures As NonParametricBaseFeatures = doc.ComponentDefinition.Features.NonParametricBaseFeatures Dim nonParamDef As NonParametricBaseFeatureDefinition = nonParamFeatures.CreateDefinition Dim tObjs As TransientObjects = ThisApplication.TransientObjects Dim objs As ObjectCollection = tObjs.CreateObjectCollection objs.Add(body) nonParamDef.BRepEntities = objs nonParamDef.OutputType = BaseFeatureOutputTypeEnum.kSolidOutputType nonParamFeatures.AddByDefinition(nonParamDef)
Jelte de Jong
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.
Blog: hjalte.nl - github.com
Hello JelteDeJong,
thank you for the quick reply.
what I mean is:
E.g. I have here a cube that has been made into a triangle by the extrudions. (picture 1)
(picture 1)
If I suppress the extrusions, I get the original shape again. (picture 2)
(picture 2)
But how do I get the "original shape" (the cube) without suppressing the extrusions?
I need to get to the "invisible" faces.
Thanks in advance!
Generally it is not possible, because this object "doesn't exists" in current context of model. It exists in some point of model history, but not now.
I don't know why you need this faces.
If you don't want other one know your design process,you can save it as "stp",and share the stp file to the other.
The stp file is without the sketch\features\Work features.