Surface area of a solid body with iLogic

[dominiek_vanwest]

Hi,

To get the volume of a solid body (in a multibody part) with iLogic, I use the following code:

AddVbRule "SolidFunctions"

Dim bodies as New SolidBodies(ThisDoc.Document)
Contents = Round(bodies.Body("Solid1").Volume/10^9, 1) & " m³"

 To get the mass of a solid body (in a multibody part) with iLogic, I use the following code:

materialDensity = ThisDoc.Document.ComponentDefinition.Material.Density
Weight = Round(bodies.Body("Solid1").Volume * materialdensity/10^6 ,1) & " kg"

But what do I need to do to get the Surface Area of that Solid?

Thanks in advance!

Dominiek

[Vladimir.Ananyev · Accepted solution]

Solid surface area is a sum of its faces area.

You may try the following sample rule:

Dim oDoc as PartDocument = ThisDoc.Document
Dim oDef as PartComponentDefinition = oDoc.COmponentDefinition

Dim st As String =""
For Each oSurfBody As SurfaceBody In oDef.SurfaceBodies
    
    st &= vbNewLine & oSurfBody.Name & vbNewLine
    Dim volume As Double = oSurfBody.Volume(0.001)
    st &= "volime = " & volume & vbNewLine    
    
    Dim area As Double = 0.0
    For Each oFace As Face In oSurfBody.faces
        Dim oEval As SurfaceEvaluator = oFace.Evaluator
        area = area + oEval.Area
    Next
    st &= "area = " & area & vbNewLine

Next

Beep
MsgBox(st)

0.001 is the requested relative accuracy of the volume as a percentage.

cheers,

[dominiek_vanwest]

Thanks, this works!