DIAdem Help

Method: Add for OrderLines

  • Updated2024-09-12
  • 2 minute(s) read

Method: Add for OrderLines

Adds an order line to an OrderLines collection in the DIAdem VIEW script interface and returns an OrderLine object.

Set oOrderLine = Object.Add(OrderValue)
ObjectOrderLines
Object with this method
OrderValueDouble
Specifies the value of the order line.
oOrderLineOrderLine
Returned object

The following example creates a cascade display and inserts six order lines:

VBScriptPython

 

Call Data.Root.Clear()
Call DataFileLoad(ProgramDrv & "Examples\Data\cascade.tdm","TDM","")
Dim oMyDisplayObj, oMyCascadeCurve, i
Call View.NewLayout
View.Sheets(1).Areas(1).DisplayObjType = "Cascade" 
Set oMyDisplayObj = View.Sheets(1).Areas(1).DisplayObj 
Set oMyCascadeCurve = oMyDisplayObj.CurvesCascade.AddCascade("[2]/[1]","[2]/[2]","[2]/[3]")
oMyCascadeCurve.OrderChannelName = "[1]/[11]"
For i = 1 to 6
  Call oMyCascadeCurve.OrderLines.Add(i)
  oMyCascadeCurve.OrderLines(i).Color = "blue"
Next