MidPointAnchors Style? | Infragistics Forums

190

MidPointAnchors Style?

Brendon posted over 16 years ago

Is there a way to change the size/style of the MidPointAnchors of a LineChart at all? I remember a while back when I was tinkering around with the UltraChart control (2007 vol3) that I somehow changed a chart to have a "+" at the end of each line and/or where each series point was plotted on the chart... Or if possible increase the size of the MidPointAhnchors as they are so tiny it is hard to see them. Many thanks, Brendon

Parents

190

Brendon posted over 16 years ago

Right I've finally got the painting of the line points correctly plotting after fighting to no end with the chart... However there is still one thing that is perplexing to me... WHY are the points not being painted the same colour as the series shown in the legend - IMO this is a bug in the control set as I have been unable to ascertain how to actually get them to be painted the correct colour. Any ideas anyone? Having black dots all over the chart when the legend shows the correct series looks very unprofessional.
Cancel
Reply

Cancel

Reply

17605

Teodor Taushanov posted over 16 years ago in reply to Brendon

Normally the points are painted with the same colors as series in the legend. Could you send us your code, so we can investigate the problem?
Cancel
Reply

Cancel

Children

17605

Teodor Taushanov posted over 16 years ago in reply to Brendon

Ok, I got it, but the chart is designed to work in this way. If you want in this case to be displayed just one point you can submit a feature request here:
http://devcenter.infragistics.com/protected/requestfeature.aspx
Cancel
Reply

Cancel
190

Brendon posted over 16 years ago in reply to Teodor Taushanov

Something slightly off at a tangent; Why if there is only 1 data point for a series does it not plot the point? The whole excercise of the code above was JUST to plot the points so that we could view them on the chart.
Cancel
Reply

Cancel
17605

Teodor Taushanov posted over 16 years ago in reply to Brendon

You can try adding:

myCicrle.PE.StrokeWidth = 0

because by default a black line is drawn.
Cancel
Reply

Cancel
190

Brendon posted over 16 years ago in reply to Teodor Taushanov

Sorry for not posting sooner I've been in meetings this morning and not had chance to update the thread.

I found that the lines were getting painted in black while attempting to paint new points on the chart not in the colour of the series... The code I've got now to do almost what I need the UltraChart looks like this (note that the points now paint in the correct colour after digging through some more properties). To be honest I am actually trying to use the custom interpolation but it is going a little pear shaped and has been for a week now :|
Private m_PaintPoints As New Generic.List(Of ChartPointsToPaint)
Private Sub ulchtRender_FillSceneGraph(ByVal sender As Object, ByVal e As Infragistics.UltraChart.Shared.Events.FillSceneGraphEventArgs) Handles ulchtRender.FillSceneGraph

If Me.ulchtRender.ChartType = ChartType.LineChart Then
For Each p As Primitive In e.SceneGraph
Debug.Print(p.GetType.ToString)

If (TypeOf p Is Polyline) Then
'Lines to paint
Dim colSkipped As Boolean
Dim StartPointX, StartPointY, CurrentPointX, CurrentPointY As Object
Dim CurrentSeriesColour As System.Drawing.Color = Drawing.Color.Transparent
Dim CurrentRowID As Integer = -1
Dim Chartpoints As ChartPointsToPaint = Nothing

StartPointX = Nothing
StartPointY = Nothing
CurrentPointX = Nothing
CurrentPointY = Nothing

For Each pt As Infragistics.UltraChart.Core.Primitives.DataPoint In CType(p, Infragistics.UltraChart.Core.Primitives.Polyline).points
If pt.Value IsNot Nothing Then

'Points to paint in case there is only 1 point for the series
Dim newPT As New System.Drawing.Point(pt.point.X, pt.point.Y)
Dim paintPoint As New ChartPointsToPaint
paintPoint.StartPointX = pt.point.X
paintPoint.StartPointY = pt.point.Y
paintPoint.LineColour = p.PE.Fill
m_PaintPoints.Add(paintPoint)
Next

For Each paintPt As ChartPointsToPaint In m_PaintPoints
Dim myCicrle As New Ellipse(New System.Drawing.Point(CInt(paintPt.StartPointX), CInt(paintPt.StartPointY)), 2)
myCicrle.PE = New PaintElement(paintPt.LineColour, paintPt.LineColour, GradientStyle.Circular)
e.SceneGraph.Add(myCicrle)
Next

m_PaintPoints.Clear()
End If

End Sub

Public Structure ChartPointsToPaint
Public rowID As Integer
Public StartPointX As Object
Public StartPointY As Object
Public EndPointX As Object
Public EndPointY As Object
Public LineColour As Drawing.Color
End Structure
Cancel
Reply

Cancel