Page 1 of 1

Fill color bug

Posted: Fri Jul 16, 2004 12:29 pm
by 9080260
Hi,
I have found a problem in the use of TeeChart6.ocx (6.0.0.5), that may be checked in the demo project: AxisOpaqueZoneForm. If I scroll the chart to left, when the chart showing only the axis, without series, the rectangle of second, third, fourth serie was fill to the same color of previous series. Same problem happen setting series point=visible without scrolling the chart. How I can solve my problem?

Posted: Fri Jul 16, 2004 1:30 pm
by Pep
Hi Elena,

you can solve this by adding the following line :
TChart1.Canvas.Brush.Style = bsClear

Code: Select all

Private Sub TChart1_OnSeriesBeforeDrawValues(ByVal SeriesIndex As Long)
Dim serLeft, serTop, serRight, serBottom As Integer
  SeriesRect SeriesIndex, serLeft, serTop, serRight, serBottom
  TChart1.Canvas.Pen.Color = RGB(64, 128, 128)
  TChart1.Canvas.Brush.Style = bsClear
  TChart1.Canvas.Rectangle CInt(serLeft), CInt(serTop), CInt(serRight), CInt(serBottom)
  TChart1.Canvas.ClipRectangle CInt(serLeft), CInt(serTop) + 1, CInt(serRight), CInt(serBottom) - 1
End Sub

Posted: Fri Jul 16, 2004 1:50 pm
by 9080260
Tank you, you solved my problem.