Object: PolarLineAndPoints
- Updated2024-09-12
- 1 minute(s) read
(Collections | PolarSystem) > PolarCurves > PolarCurve > Object: PolarLineAndPoints
Object: PolarLineAndPoints
The PolarLineAndPoints object provides the properties of a curve in the Line and points display mode in a polar axis system in DIAdem REPORT.
The following example generates a polar axis system with a curve and displays every fiftieth y-value:
| VBScript | Python |
Dim oMyPolarAxisSystem, oMyCurve, oMyShape, oMyPoints Call Data.Root.Clear() Call DataFileLoad(DataReadPath & "Report_Data.tdm","TDM","") Call Report.NewLayout() Set oMyPolarAxisSystem = Report.ActiveSheet.Objects.Add(eReportObjectPolarSystem,"MyPolarSystem") oMyPolarAxisSystem.Position.ByCoordinate.X1 = 20 oMyPolarAxisSystem.Position.ByCoordinate.Y1 = 20 oMyPolarAxisSystem.Position.ByCoordinate.X2 = 80 oMyPolarAxisSystem.Position.ByCoordinate.Y2 = 80 Set oMyCurve = oMyPolarAxisSystem.CurvesPolar.Add(ePolarShapeLineAndPoints, "MyNewCurve") Set oMyShape = oMyCurve.Shape oMyShape.XChannel.Reference= "[5]/[1]" oMyShape.YChannel.Reference = "[5]/[2]" Call oMyShape.Line.Color.SetPredefinedColor(eColorIndexBlue) oMyShape.Extensions.Label.Repetition.Mode = eLabelRepetitionNthPoint Set oMyPoints = oMyShape.Settings.Points oMyPoints.YValueFormat = "d.d" oMyPoints.YValueVisible = True oMyPoints.DisplayEveryNthPoint = 50 Call Report.Refresh()
Properties
Extensions | Settings | XChannel | YChannel