Hi @Stephane.kapetanovic 🙂
Thank you for answering 🙂 Managed to work for panels. How about bar forces?
Dim EV As RobotOM.RobotExtremeValue
Dim Params As RobotOM.RobotExtremeParams
Params = New RobotOM.RobotExtremeParams
(...)
or
I_CT_RESULT_QUERY_PARAMS?
Not possible to barforceserver with method Value, right?
Params.ValueType = I_EVT_FORCE_BAR_MY
Set REV = RobApp.Project.Structure.Results.Extremes.MinValue(Params)
Dim BFD As RobotBarForceData
Set BFD = RobApp.Project.Structure.Results.Bars.Forces.ValueEx(REV.Bar, REV.Case, REV.CaseCmpnt, REV.Position)
zzz = BFD.FX
zz1 = BFD.FY
zz2 = BFD.FZ
zz3 = BFD.MX
zz4 = BFD.MY
zz5 = BFD.MZAlso, could you please explain me what does it mean to indicate "I_EVT_FORCE_BAR_MY" and then get all results for bar forces? Wouldn't it only provide My?
Also, Why use a query instead of barforces?
Sorry for all these questions, but I am trying to fit this in the bar force extraction without query...
Thanks again for your help and patience 🙂
Thanks again