Fill color bug

TeeChart for ActiveX, COM and ASP
Post Reply
Elena
Newbie
Newbie
Posts: 6
Joined: Tue Dec 16, 2003 5:00 am
Contact:

Fill color bug

Post by Elena » Fri Jul 16, 2004 12:29 pm

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?

Pep
Site Admin
Site Admin
Posts: 3303
Joined: Fri Nov 14, 2003 5:00 am
Contact:

Post by Pep » Fri Jul 16, 2004 1:30 pm

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

Elena
Newbie
Newbie
Posts: 6
Joined: Tue Dec 16, 2003 5:00 am
Contact:

Post by Elena » Fri Jul 16, 2004 1:50 pm

Tank you, you solved my problem.

Post Reply