Steema Central

Posted: **Thu Feb 10, 2005 7:12 pm**

I am creating a chart standard line series.

I am adding data with,
TChartz.Series(0).Add(CDbl(Cumulative), CDbl(Y1Out))

When I set,
TChartz.Axes.Bottom.Automatic = True
I get an error “Input string was not in the correct format”
But only if the x series goes over 1000

When I set TChartz.Axes.Bottom.Automatic = False
TChartz.Axes.Bottom.Maximum = 999
I get a chart but if I set TChartz.Axes.Bottom.Maximum to any number greater than 1000 I again get the error “Input string was not in the correct format”.

Is there some value I am not setting properly to set the x axis?

Posted: **Fri Feb 11, 2005 9:49 am**

Hi Avatar,

I've done some testing but haven't succeeded reproducing the problem you report. Could you please send us a project we can run "as-is" to rerproduce the problem here?

You can post it in the steema.public.attachments newsgroup available at news://www.steema.net.

Thanks in advance.

Posted: **Fri Feb 11, 2005 3:27 pm**

I created a new chart and started adding code back and checking for an error.

When my x axis is time on occasion the x axis labels overlap. I was using:

Private Sub TChartz_GetAxisLabel(ByVal sender As Object, ByVal e As Steema.TeeChart.GetAxisLabelEventArgs) Handles TChartz.GetAxisLabel
If (CType(sender, Steema.TeeChart.Axis) Is TChartz.Axes.Bottom) Then
If (Convert.ToInt16(e.LabelText).ToString() Mod 3 <> 0) Then e.LabelText = ""
End If
End Sub
If I bypass this for a no time axis it will work.

Thanks

Posted: **Fri Feb 11, 2005 4:59 pm**

Hi Avatar,

I've been able to reproduce your problem here and made a slight modification to your code.

Code: Select all

   Private Sub TChart1_GetAxisLabel(ByVal sender As Object, ByVal e As Steema.TeeChart.GetAxisLabelEventArgs) Handles TChart1.GetAxisLabel
        If (CType(sender, Steema.TeeChart.Axis) Is TChart1.Axes.Bottom) Then
            Dim tmpS As String = e.LabelText.Replace(",", "")
            If (Convert.ToInt16(tmpS).ToString() Mod 3 <> 0) Then
                e.LabelText = ""
            End If
        End If
    End Sub

Steema Central

Error with .Axes.Bottom.Maximum > 1000

Error with .Axes.Bottom.Maximum > 1000