This content is not available in your preferred language.

The content is shown in another available language. Your browser may include features that can help translate the text.

Adding A Line or Curve to a Graph In DIAdem

Updated Apr 28, 2025

Environment

Software

  • DIAdem Full
  • DIAdem

This article explains how to display a line parallel to the X axis at a constant Y value on a DIAdem plot. 

Follow the steps below to manually generate a graph from example data, and then add a constant line to the graph:

1. Go to your REPORT tab and select New Layout from the toolbar.
 


2. Add a 2D Axis System with Line to the report by clicking the 2D Line Graph icon > Lines, then clicking on the 2D Axis System with Line, then dragging your cursor into the report window.​

3. Open the Data Portal and select the data you would like to plot. for this example we selected Noise_1 from DIAdem's example data. Drag this data into the 2D Axis Plot.
 
4. To add a line or curve, double-click the 2D Axis Plot.

5. Select New Entry
 
 
 
6. To generate a constant line, select Constant from the left hand menu, and type the desired value into the field labeled Y-constant. Click OK until you are back at the main graph.
 
 
 
8. You can now view the constant line on your graph.

     


    The below VBSCript will programmatically generate a graph from example data, and then add constant lines to the graph:

     

    'This section of the code creates the Plot
    Dim oMy2DAxisSystem, oMyPos, oMy2DCurve, oMy2DConstY,oMy2DConstX
    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 oMy2DCurve = oMy2DaxisSystem.Curves2D.Add(e2DShapeLine, "MyNew2DCurve")
    oMy2DCurve.Shape.XChannel.Reference = "EXAMPLE/Time"
    oMy2DCurve.Shape.YChannel.Reference = "EXAMPLE/Speed" 
    Call Report.Refresh()

    'This section of the code creates a new constant curve, which is parallel with the X axis
    Set oMy2DConstY = oMy2DaxisSystem.Curves2D.Add(e2DShapeConstant, "MyNew2DConstantY")
    oMy2DConstY.Shape.XConstant.Reference = NOVALUE
    oMy2DConstY.Shape.YConstant.Reference = 32
    Call oMy2DConstY.Shape.Settings.Line.Color.SetPredefinedColor(eColorIndexGreen)
    Call Report.Refresh()

    'This section of the code creates a new constant curve, which is parallel with the Y axis
    Set oMy2DConstX = oMy2DaxisSystem.Curves2D.Add(e2DShapeConstant, "MyNew2DConstantX")
    oMy2DConstX.Shape.XConstant.Reference = 30
    oMy2DConstX.Shape.YConstant.Reference = NOVALUE
    Call oMy2DConstX.Shape.Settings.Line.Color.SetPredefinedColor(eColorIndexRed)
    Call Report.Refresh() 

    If you run the code above you should see the following plot in the DIAdem report: