745x
004975
2021-04-08

Pregunta

¿Cómo puedo cambiar los parámetros de cálculo de un caso de carga usando la interfaz COM?


Respuesta:

Los parámetros de cálculo de un caso de carga no se pueden establecer inicialmente al crearlo, sino solo después utilizando la interfaz del caso de carga existente. Para obtener la interfaz de un caso de carga, primero debe obtener las interfaces "IModel" e "ILoads":


Parámetros_de_análisis_prueba secundaria ()

Dim iApp As RFEM5.Application
Establecer iApp = GetObject (, "RFEM5.Application")

iApp.LockLicense

Dim iMod como RFEM5.IModel3
Set iMod = iApp.GetActiveModel

On Error GoTo e

'obtener interfaz de cargas
Atenuar iLds como RFEM5.iLoads
Establecer iLds = iMod.GetLoads

'obtener la interfaz del caso de carga
Dim iLc como RFEM5.ILoadCase
Establecer iLc = iLds.GetLoadCase (1, AtNo)

'obtener parámetros de análisis
Dim param_analy como RFEM5.AnalysisParameters
param_analy = iLc.GetAnalysisParameters

'cambiar parámetros de análisis
param_analy.Method = Postcrítico
param_analy.ModifyLoadingByFactor = True
param_analy.LoadingFactor = 1.5
'...

'establecer nuevos parámetros de análisis
iLds.PrepareModification
iLc.SetAnalysisParameters param_analy
iLds.FinishModification

e:

Si Err.Number <> 0, entonces MsgBox Err.description, vbCritical, Err.Source

iMod.GetApplication.UnlockLicense
Establecer iMod = Nada

End Sub

Use "ILoads.GetLoadcase" para obtener la interfaz para un caso de carga específico. Esta interfaz proporciona las funciones "GetAnalysisParameters" y "SetAnalysisparameters" que puede usar para leer y escribir los parámetros.

El mismo procedimiento también se aplica para las combinaciones de carga.