如何云圖顯示壁厚
發(fā)布者:cadit 發(fā)布時(shí)間:2016/1/18 閱讀:3961 次

腳本:

?
?Set Synergy = CreateObject("synergy.Synergy")
?' Get aspect ratio diagnostics
?Set Elems = Synergy.CreateIntegerArray()
?Set TH = Synergy.CreateDoubleArray()
?Set DiagnosisManager = Synergy.DiagnosisManager()
?DiagnosisManager.GetThicknessDiagnosis2 0.0, 1000.0, True, Elems, TH

?Set DiagnosisManager = Nothing

?' Create user plot
?Set PlotMgr = Synergy.PlotManager()
?PlotMgr.DeletePlotByName "Thickness"
?Set ARPlot = PlotMgr.CreateUserPlot()
?ARPlot.SetDataType "ELDT"
?ARPlot.SetName "Thickness"
?ARPlot.AddScalarData 0.0, Elems, TH
?ARPlot.Build
?' Plot the data - Turn off Nodal Averaging of the result
?Dim Plot
?Set Plot = PlotMgr.FindPlotByName( "Thickness")
?Plot.SetNodalAveraging False

?Plot.Regenerate 


上一篇:beam和fusion的連接問題
下一篇:如何查詢產(chǎn)品真圓度