Pregunta:
¿Cómo puedo calcular sólo casos de carga, combinaciones de carga o combinaciones de resultados muy específicas, utilizando un comando con la interfaz COM?
Respuesta:
Para sólo calcular ciertos casos de carga, combinaciones de carga o combinaciones de resultados, justo como el comando "Para calcular...." (ver figura 01), puede usar el método "CalculateBarch" de la interfaz ICalculation. Al transferir datos, el método espera un campo con el tipo de carga. La carga incluye el número de la carga, y el tipo (p. ej. combinación de carga):
Sub batch_test ()
' get interface from the opened model and lock the licence/program
Atenuar iModel como RFEM5.IModel3
Set iModel = GetObject(, "RFEM5.Model")
iModel.GetApplication.LockLicense
On Error GoTo e
'obtener interfaz para el cálculo
Dim iCalc As ICalculation2
Set iCalc = iModel.GetCalculation
'crear matriz con tipos de carga
Dim cargas (3) como carga
cargas (0) .no = 1
cargas (0) .Type = LoadCaseType
cargas (1) .no = 4
cargas (1) .Type = LoadCaseType
cargas (2) .no = 4
loadings (2) .Type = LoadCombinationType
'calcular todas las cargas de la matriz a la vez
iCalc.CalculateBatch loads
e: If Err.Number 0 Then MsgBox Err.description, , Err.Source
Establecer iModelData = Nothing
iModel.GetApplication.UnlockLicense
Establecer iModel = Nothing
End Sub