Subchart properties

[lilo]

Hi,

I have created a new subchart:

Dim chart = SubChartTool1.Charts.AddChart("Chart0")
chart.Series.Add(New Steema.TeeChart.Styles.FastLine())

How do I change the line width on the subchart?

Dim chart = SubChartTool1.Charts.AddChart("Chart0")
chart.Series.Add(New Steema.TeeChart.Styles.Points())

How do I access the pointer properties?

[Sandra]

Hello lilo,

To access to pointer the same way as you do when add the series in the Chart. See next code:

Code: Select all

Dim chart = SubChartTool1.Charts.AddChart("Chart0")
chart.Series.Add(New Steema.TeeChart.Styles.FastLine())

How do I change the line width on the subchart?

Dim chart = SubChartTool1.Charts.AddChart("Chart0")
chart.Series.Add(New Steema.TeeChart.Styles.Points())
(chart(0) as Steema.TeeChart.Styles.Points).Pointer.Visible=True

Could you tell us if previous code works in your end?If you have any problems please let me know.

Thanks,

[lilo]

This does not work, I get a syntax error.
Dim chart = SubChartTool1.Charts.AddChart("Chart0")
chart.Series.Add(New Steema.TeeChart.Styles.Points())
(chart(0) as Steema.TeeChart.Styles.Points).Pointer.Visible=True
~

I have tried:

chart.Pointer.Visible=True
chart.series(0).pointer.visible=True
plus other variations

[Sandra]

Hello lilo,

Please check if my new suggestion of code works in your end:

Code: Select all

    Private Sub InitializeChart()
        SubChartTool1 = New Steema.TeeChart.Tools.SubChartTool(TChart1.Chart)
        tChart2 = SubChartTool1.Charts.AddChart("Chart0")
        TChart1.Series.Add(New Steema.TeeChart.Styles.FastLine())
        TChart1(0).FillSampleValues()
        tChart2.Series.Add(New Steema.TeeChart.Styles.Points())
        tChart2(0).FillSampleValues()
        TryCast(tChart2(0), Steema.TeeChart.Styles.Points).Pointer.Visible = True
    End Sub

I hope will helps.

Thanks,

[lilo]

This works well, Thank You!!