I want to show my own labels on the Y-axis.
However it does some strange thing and shows 2 labels in stead of all (see jpg).
What am i doing wrong here?
Dim Chart As NChart
Chart = NDSChart.Charts.Item(0)
NDSChart.Legends.Clear()
NDSChart.Settings.RenderDevice = Nevron.GraphicsCore.RenderDevice.GDI
Chart.Projection.ViewerRotation = 0
Dim Ax As NAxis = Nothing
Ax = Chart.Axis(StandardAxis.PrimaryY)
Chart.Axis(Nevron.Chart.StandardAxis.PrimaryX).Visible =
TrueChart.Axis(Nevron.Chart.StandardAxis.PrimaryY).Visible =
TrueDim NumScaley As New NOrdinalScaleConfiguratorNumScaley.AutoLabels =
FalseNumScaley.Labels.Clear()
For i As Integer = 1 To 17NumScaley.Labels.Add(i.ToString)
NextNumScaley.RoundToTickMax =
FalseNumScaley.RoundToTickMin =
FalseChart.Axis(StandardAxis.PrimaryY).ScaleConfigurator = NumScaley
Chart.Axis(StandardAxis.PrimaryY).InvalidateScale()
Dim b1 As NLineSeries = Chart.Series.Add(SeriesType.Line)b1.MarkerStyle.Visible =
Trueb1.DataLabelStyle.Visible =
Falseb1.MarkerStyle.PointShape = PointShape.Cross
Chart.Axis(StandardAxis.PrimaryX).ScaleConfigurator =
New NOrdinalScaleConfiguratorIf Not IsNothing(Ax) ThenDim scalex As NStandardScaleConfigurator = Ax.ScaleConfiguratorscalex.MajorGridStyle.LineStyle.Pattern = Nevron.GraphicsCore.LinePattern.Solid
scalex.MajorGridStyle.LineStyle.Width =
New Nevron.GraphicsCore.NLength(1)scalex.MajorGridStyle.LineStyle.Factor = 1
scalex.LabelStyle.Angle =
New NScaleLabelAngle(ScaleLabelAngleMode.UseCustomAngle, 0)End IfDim P As New NDataPoint(2.84)b1.AddDataPoint(P)
P =
New NDataPoint(2.97)b1.AddDataPoint(P)
P =
New NDataPoint(3.52)b1.AddDataPoint(P)
P =
New NDataPoint(3.4)b1.AddDataPoint(P)
P =
New NDataPoint(4.07)b1.AddDataPoint(P)
P =
New NDataPoint(3.1)b1.AddDataPoint(P)
P =
New NDataPoint(3.23)b1.AddDataPoint(P)
P =
New NDataPoint(2.94)b1.AddDataPoint(P)
P =
New NDataPoint(3.1)b1.AddDataPoint(P)
P =
New NDataPoint(3.23)b1.AddDataPoint(P)
P =
New NDataPoint(2.94)b1.AddDataPoint(P)
P =
New NDataPoint(3.1)b1.AddDataPoint(P)
P =
New NDataPoint(3.22)b1.AddDataPoint(P)
P =
New NDataPoint(3.18)b1.AddDataPoint(P)
P =
New NDataPoint(3.02)b1.AddDataPoint(P)
P =
New NDataPoint(3.62)b1.AddDataPoint(P)
P =
New NDataPoint(3.27)b1.AddDataPoint(P)
NDSChart.Visible =
TrueNDSChart.Refresh()