T-FLEX Parametric CAD. Fundamentals. 2D Design

‘Opening block of documents changes
document.BeginChanges("Creating graphic lines")
‘Creating graphic line and 2D free node objects
Dim line As ConstructionOutline
Dim node1 As FreeNode
Dim node2 As FreeNode
Dim X_1, Y_1, X_2, Y_2 As Double
X_1 = System.Convert.ToDouble(NodeX1)
Y_1 = System.Convert.ToDouble(NodeY1)
X_2 = System.Convert.ToDouble(NodeX2)
Y_2 = System.Convert.ToDouble(NodeY2)
‘Creating 2D free nodes
node1 = new FreeNode(document,new Parameter(X_1),new Parameter(Y_1 ))
node2 = new FreeNode(document,new Parameter(X_2),new Parameter(Y_2 ))
‘Creating graphic line between two nodes
line = new ConstructionOutline(document,node1,node2)
‘Closing block of document changes
document.EndChanges()
End Sub
End Class
End Namespace
Macros
When the macro is executed in T-FLEX CAD, the «FormLine» dialog appears. Upon clicking the control
element – the «OK» button, a segment will be created between the two nodes in the drawing area.
755