Alterar configuração da malha de EF através da interface COM

A configuração geral da malha de EF pode ser modificada com o auxílio da interface IFeMeshSettings. Esta interface está localizada em IModel > IModelData > ICalculation. A Figura 01 mostra os elementos que podem ser modificados/apresentados.

1. Veja aqui um exemplo de um código em que o comprimento-alvo dos elementos de EF é definido para 100 mm. Além disso, ainda é ativada a divisão das barras com o mesmo tamanho de elemento e a divisão mínima é definida para 3 elementos:
3. código.vb#

Sub mesh_params()

Dim iApp As RFEM5.Application

' get interface for model data
Dim iModel As RFEM5.model
Set iModel = GetObject(, "RFEM5.Model")

On Error GoTo e

If Not iModel Is Nothing Then

1. ' get interface for application and lock licence
2. Set iApp = iModel.GetApplication()
3. iApp.LockLicense
5. ' get interface for model dat
6. Dim iModdata As RFEM5.IModelData2
7. Set iModdata = iModel.GetModelData
9. ' get interface for calculation
10. Dim iCalc As RFEM5.ICalculation2
11. Set iCalc = iModel.GetCalculation()
13. ' get interface for mesh settings
14. Dim iMeshSet As RFEM5.IFeMeshSettings
15. Set iMeshSet = iCalc.GetFeMeshSettings
17. ' get general mesh settings
18. Dim meshGen As RFEM5.FeMeshGeneralSettings
19. meshGen = iMeshSet.GetGeneral
21. meshGen.ElementLength = 0.1
23. ' set new general mesh settings
24. iModdata.PrepareModification
25. iMeshSet.SetGeneral meshGen
26. iModdata.FinishModification
28. ' get mesh member settings
29. Dim meshMem As RFEM5.FeMeshMembersSettings
30. meshMem = iMeshSet.GetMembers
32. meshMem.DivideStraightMembers = True
33. meshMem.ElementLength = 0.1
34. meshMem.MinStraightMemberDivisions = 3
36. ' set new mesh member settings
37. iModdata.PrepareModification
38. iMeshSet.SetMembers meshMem
39. iModdata.FinishModification
42. iApp.UnlockLicense

End If

e: If Err.Number <> 0 Then

1. MsgBox Err.description, , Err.Source
2. End If
3. iApp.UnlockLicense
4. Set iApp = Nothing
5. Set iModel = Nothing

End Sub
#/code#

A sub-rotina também é completada por uma rotina de interceção de erros (On Error GoTo e) e volta a ser necessário um bloco Prepare-/FinishModification, tal como para a modificação de outros elementos. Aqui, o bloco é criado através da interface IFeMeshSettings.

FAQ

[EN] FAQ 004688 | Como é que posso alterar a configuração da malha de EF através da interface COM?

Elementos da configuração da malha de EF disponíveis através da interface RF-COM