Ler as resultantes de um corte através da interface COM

Como todos os outros resultados, a resultante de um corte pode ser lida através de Model3 → ICalculation2 → IResults2. A interface para os resultados é fornecida pela função GetResultant, a qual devolve a estrutura ResultantForce depois de especificar o número do corte e o tipo de distribuição de resultados. Esta estrutura inclui, entre outras coisas, as forças e os momentos como vetores:

1. código.vb#

Sub GetResultantSection()

1. Dim iApp As RFEM5.Application
2. Dim iModel As RFEM5.model
3. Set iModel = GetObject(, "RFEM5.Model")

1. On Error GoTo e

1. ' get interface from model
2. Set iApp = iModel.GetApplication
3. iApp.LockLicense

1. ' get interface from calculation
2. Dim iCalc As RFEM5.ICalculation2
3. Set iCalc = iModel.GetCalculation

1. ' get interface from results from loadcase 1
2. Dim iRes As RFEM5.IResults2
3. Set iRes = iCalc.GetResultsInFeNodes(LoadCaseType, 1)

1. ' get Resultant
2. Dim section_resultant As ResultantForce
3. section_resultant = iRes.GetResultant(1, AtNo, ConstantDistributionOnElements)

e:
If Err.Number <> 0 Then

1. MsgBox Err.Number & " " & Err.description

End If

If Not iApp Is Nothing Then

1. iApp.UnlockLicense

End If

End Sub
#/code#

FAQ

[PT] FAQ 004869 | Como é que posso ler a resultante de uma secção através da interface COM ...

• Visualizador 3D | Google
• Visualizador 3D | Babylon
• Realidade virtual

Resultante de um corte de teste no RFEM