I am having trouble with my pens.
Using the Minimal App sample. I created three nodes with three links. Each link had a New pen created. Each pen had a compound array set as follows:
link 1 (first - second) = { 0.0 , 0.5, 0.9, 1}
link 2 (first - third) = {0.0, 0.2, 0.4, 0.6, 0.8, 1.0}
link 3 9second - third) = {0.0, 0.2, 0.4, 0.6, 0.8, 1.0}
For link 1 & 2 I used a pen color of Blue, and link 3 I used Green. It appears that after creating the pen for the link 1, the second pen for link 2 was ignored and it re-used the first pen.
Any ideas why would be grateful considered! I have created this by amending the sub new in the minimal app as follows:
Public Sub New()
MyBase.New()
Me.Text = "Minimal GoDiagram App"
' create a Go view (a RichControl) and add to the form
Dim myView As GoView = New GoView()
myView.Dock = DockStyle.Fill
Me.Controls.Add(myView)
' create two nodes for fun...
Dim node1 As GoBasicNode = New GoBasicNode()
' specify position, label and color
node1.Location = New PointF(100, 100)
node1.Text = "first"
node1.Editable = True ' first node is editable with F2 only
node1.Brush = Brushes.Blue
' add to the document, not to the view
myView.Document.Add(node1)
Dim node2 As GoBasicNode = New GoBasicNode()
node2.Location = New PointF(200, 100)
node2.Text = "second"
node2.Label.Editable = True ' second node is editable by clicking only
node2.Brush = Brushes.Magenta
myView.Document.Add(node2)
Dim node3 As GoBasicNode = New GoBasicNode()
node3.Location = New PointF(200, 200)
node3.Text = "third"
node3.Label.Editable = True ' second node is editable by clicking only
node3.Brush = Brushes.Magenta
myView.Document.Add(node3)
Dim link1 As GoLink = New GoLink
link1.FromPort = node1.Port
link1.ToPort = node2.Port
Dim pen1 As New Pen(Color.Blue, 10)
pen1.CompoundArray = New Single() {0.0, 0.5, 0.9, 1}
link1.Pen = pen1
myView.Document.Add(link1)
Dim link2 As GoLink = New GoLink
link2.FromPort = node1.Port
link2.ToPort = node3.Port
Dim pen2 As New Pen(Color.Blue, 10)
pen2.CompoundArray = New Single() {0.0, 0.2, 0.4, 0.6, 0.8, 1}
link2.Pen = pen2
myView.Document.Add(link2)
Dim link3 As GoLink = New GoLink
link3.FromPort = node2.Port
link3.ToPort = node3.Port
Dim pen3 As New Pen(Color.Green, 10)
pen3.CompoundArray = New Single() {0.0, 0.2, 0.4, 0.6, 0.8, 1}
link3.Pen = pen3
myView.Document.Add(link3)
End Sub