Printing error
Posted: Fri May 07, 2004 10:30 pm
ActiveX 5.0 printing problem when printing a chart with several text annotations on it. "Range Check Error" appears after selecting "print or print preview"
which TeeChart version are you using ? I've tried to reproduce the problem here using the following code
with the latest v6.05 and it works fine.
Code: Select all
Private Sub Form_Load()
With TChart1
.AddSeries scLine
.Series(0).FillSampleValues (10)
For i = 0 To 5
.Tools.Add tcAnnotate
.Tools.Items(i).asAnnotation.Text = "Annotation " & i
.Tools.Items(i).asAnnotation.Shape.Left = .Tools.Items(i).asAnnotation.Shape.Left + (100 * i)
Next i
End With
End Sub
Private Sub Preview_Click()
TChart1.Printer.ShowPreview
End Sub
Private Sub Print_Click()
TChart1.Printer.PrintChart
End Sub