Object: 2DSpikes
- Updated2024-09-12
- 1 minute(s) read
(2DAxisSystem | Collections) > 2DCurves > 2DCurve > Object: 2DSpikes
Object: 2DSpikes
The 2DSpikes object provides the curve properties of a 2D axis system in the Spikes display mode in DIAdem REPORT.
The following example generates an axis system with a curve and specifies the curve parameters:
| VBScript | Python |
Dim oMy2DAxisSystem, oMyCurve, oMyPos, oMyShape, oMySettings Call Data.Root.Clear Call DataFileLoad(ProgramDrv & "\examples\data\Report_EXPL","TDM","") Call Report.NewLayout() Set oMy2DAxisSystem = Report.ActiveSheet.Objects.Add(eReportObject2DAxisSystem, "My2DAxisSystem") Set oMyPos = oMy2DAxisSystem.Position.ByCoordinate oMyPos.X1 = 20 oMyPos.X2 = 80 oMyPos.Y1 = 20 oMyPos.Y2 = 80 Set oMyCurve = oMy2DAxisSystem.Curves2D.Add(e2DShapeSpikes, "MyCurve") Set oMyShape = oMyCurve.Shape oMyShape.XChannel.Reference = "[6]/[1]" oMyShape.YChannel.Reference = "[6]/[2]" Call oMyShape.Settings.Line.Color.SetPredefinedColor(eColorIndexRed) oMyShape.Settings.Line.Width = eLineWidth0050 Set oMySettings = oMyShape.Settings Call oMySettings.Line.Color.SetPredefinedColor(eColorIndexRed) oMySettings.Line.Width = eLineWidth0100 Call Report.Refresh()