Property: Line for 2DAdditionalErrorBars

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)


DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help
DIAdem 2020 SP1 Help

Returns the curve parameters of an error bar in a 2D axis system in DIAdem REPORT.

Set o2DErrorBarLine = Object.Line
Object2DAdditionalErrorBars
Object with this property
o2DErrorBarLine2DErrorBarLine
Returned object

The following example generates a 2D axis system with a curve and assigns an error bar to either side of this curve:

Dim oMy2DAxisSystem, oMyPos, oMyCurve, oMyErrorBars, oMyErrorBarsLine
Call Report.NewLayout()
Call Data.Root.Clear()
Call DataFileLoad(DataReadPath & "Report_Data.tdm","TDM","")
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(e2DShapeLine, "MyCurve")
oMyCurve.Shape.XChannel.Reference = "[6]/[1]" 
oMyCurve.Shape.YChannel.Reference = "[6]/[2]" 
Set oMyErrorBars = oMyCurve.Shape.Extensions.ErrorBars
oMyErrorBars.YErrorBar.Type = eErrorbarPositiveAndNegative
oMyErrorBars.YErrorBar.ErrorType = eErrorbarErrorTypeAbsoluteError 
oMyErrorBars.YErrorBar.AbsoluteErrorValue = 2
oMyErrorBars.EndCap.Type = eErrorbarDisplaySpike
Set oMyErrorBarsLine = oMyErrorBars.Line
oMyErrorBarsLine.LineType = eLineTypeSolid
oMyErrorBarsLine.UseCurveColor = False
Call oMyErrorBarsLine.Color.SetPredefinedColor(ePredefinedColorTurquoise)
Call Report.Refresh()

WAS THIS ARTICLE HELPFUL?

Not Helpful