967x
004184
2019-11-01

Domanda

Come posso impostare i parametri di calcolo utilizzando l'interfaccia COM?


Risposta:
Il codice seguente mostra come ottenere diversi parametri di calcolo tramite l'interfaccia COM. Mostra anche come specificare l'impostazione per la disattivazione della rigidezza a taglio:

' ottieni l'interfaccia del modello
Set iApp = iModel.GetApplication()
iApp.LockLicense
    
' ottieni l'interfaccia di calcolo
Dim iCalc As RFEM5.ICalculation2
Imposta iCalc = iModel.GetCalculation
    
' ottieni la teoria della flessione della superficie
Dim calc_bend As RFEM5.BendingTheoryType
calc_bend = iCalc.GetBendingTheory
    
' ottieni le impostazioni per le non linearità
Dim calc_nl As RFEM5.CalcoloNonlinearità
calc_nl = iCalc.GetNonlinearities
    
' ottieni le impostazioni di precisione e tolleranza
Dim calc_prec As RFEM5.PrecisionAndTolerance
calc_prec = iCalc.GetPrecisionAndTolerance
    
' ottieni le impostazioni di calcolo
Dim calc_sets As RFEM5.CalculationSettings
calc_sets = iCalc.GetSettings
    
' ottieni opzioni di calcolo
Dim calc_opts As RFEM5.CalculationOptions
calc_opts = iCalc.GetOptions
    
' imposta ShearStiffness su false
calc_opts.ShearStiffness = False
iCalc.SetOptions calc_opts

In Download, puoi trovare la macro EXCEL.