New issue with LoadFromFile/SaveToFile function : when property .ShowInEditor of a serie is set to True at the SaveFromFile phase (for example in MACD function where by default only serie0 and serie1 are displayed in Editor, not serie2 and serie3) this property is not loaded on the LoadFromFile phase for serie2 and serie3.
Could you confirm this issue and add it to our 'to solve wishes list'

Thanks
Guilz
Code: Select all
Private Sub ButtonSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonSave.Click
AxTChart1.RemoveAllSeries()
AxTChart1.Aspect.View3D = False
AxTChart1.Axis.Left.EndPosition = 49
AxTChart1.AddSeries(TeeChart.ESeriesClass.scCandle)
AxTChart1.Series(0).FillSampleValues(100)
AxTChart1.Series(0).Title = "Source Random Serie"
AxTChart1.Axis.AddCustom(False)
AxTChart1.Axis.Custom(0).StartPosition = 51
AxTChart1.Axis.Custom(0).EndPosition = 100
AxTChart1.AddSeries(TeeChart.ESeriesClass.scLine)
AxTChart1.Series(1).SetFunction(TeeChart.EFunctionType.tfMACD)
AxTChart1.Series(1).DataSource = AxTChart1.Series(0)
AxTChart1.Series(1).FunctionType.Period = 10
AxTChart1.Series(1).VerticalAxisCustom = 0
AxTChart1.Series(1).Title = "MACD1"
AxTChart1.Series(2).VerticalAxisCustom = 0
AxTChart1.Series(2).Title = "MACD2"
AxTChart1.Series(2).ShowInEditor = True
AxTChart1.Series(3).VerticalAxisCustom = 0
AxTChart1.Series(3).Title = "MACD3"
AxTChart1.Series(3).ShowInEditor = True
AxTChart1.Export.asNative.SaveToFile("C:\test1.tee", True)
End Sub
Private Sub ButtonLoad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonLoad.Click
AxTChart1.Import.LoadFromFile("C:\test1.tee")
End Sub
Private Sub ButtonClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonClear.Click
AxTChart1.RemoveAllSeries()
End Sub
Private Sub AxTChart1_OnAfterDraw(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxTChart1.OnAfterDraw
End Sub
Private Sub AxTChart1_OnDblClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles AxTChart1.OnDblClick
AxTeeEditor1.ChartLink = AxTChart1.ChartLink
AxTeeEditor1.ShowEditor()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Debug.Print("Title0:" & AxTChart1.Series(0).Title)
Debug.Print("Title1:" & AxTChart1.Series(1).Title)
Debug.Print("Title2:" & AxTChart1.Series(2).Title)
Debug.Print("Title3:" & AxTChart1.Series(3).Title)
End Sub