It doesn't work, here is my "StartDraw" overrides behavior methode :
Public Overrides Function StartDraw(ByVal point As System.Drawing.PointF) As MindFusion.Diagramming.WinForms.InteractionState
Dim Node As MindFusion.Diagramming.WinForms.Node = FlowChart.GetNodeAt(point, True, False)
If Node IsNot Nothing Then
Dim FlowChartObject As MindFusion.Diagramming.WinForms.ChartObject = FlowChart.GetObjectAt(point, False)
If FlowChartObject IsNot Nothing AndAlso FlowChartObject.Selected Then
Return New MindFusion.Diagramming.WinForms.InteractionState(FlowChartObject, 8, MindFusion.Diagramming.WinForms.Action.Modify)
Else
'Me.DefaultArrow.ControlPoints.Clear()
'Return New MindFusion.Diagramming.WinForms.InteractionState(Me._Default_Arrow, -1, MindFusion.Diagramming.WinForms.Action.Create)
Try
Dim ArrowTest As New Arrow(FlowChart, Node)
Dim ArrowTest1 As New Arrow(Me.DefaultArrow, Node, New DummyNode(Me.FlowChart))
Dim ArrowTest2 As New Arrow(Me.DefaultArrow, Node, New DummyNode(Me.FlowChart))
'ArrowTest2.Destination = Nothing
ArrowTest2.ControlPoints.Clear()
ArrowTest2.ControlPoints.Add(New System.Drawing.PointF(0, 0))
ArrowTest2.ControlPoints.Add(New System.Drawing.PointF(0, 0))
Return New MindFusion.Diagramming.WinForms.InteractionState(ArrowTest, -1, MindFusion.Diagramming.WinForms.Action.Create)
Catch ex As Exception
MsgBox(ex.StackTrace)
Return Nothing
End Try
End If
Else
Dim Table As New MindFusion.Diagramming.WinForms.Table(FlowChart)
Return New MindFusion.Diagramming.WinForms.InteractionState(Table, -1, MindFusion.Diagramming.WinForms.Action.Create)
End If
End Function
Node is the variable wich represent the node under the mouse
ArrowTest is an Arrow I want to create whose work fine
ArrowTest1 and ArrowTest2 are Arrows I want to create whose doesn't work
So I'll try to fine the difference between ArrowTest and ArrowTest1 & 2 with Debugging spy
ArrowTest.Destination = nothing
ArrowTest.Destination <> nothing
How can I set my arrow destination property to nothing; i'll try ArrowTest.Destination = nothing
but it doesn't work.