Page 1 of 1

OnGetSeriesPointerStyle not running

Posted: Tue Mar 22, 2005 5:13 pm
by 9526113
I'm using TChart 7 in Access 2003.

I'm trying to use OnGetSeriesPointerStyle to customize some series points.

But it doesn't seem to run. I added a msgbox command to test that. Nothing.

The project compiles w/o error.

Is there something I need to do to cause the event to trigger and run?

Here's the code (The chart is named TChart):

Code: Select all

Private Sub TChart_OnGetSeriesPointerStyle(ByVal SeriesIndex As Long, ByVal ValueIndex As Long, AStyle As Long)
  ';MsgBox SeriesIndex & " - " & ValueIndex
  Debug.Print "Running..."
  If ValueIndex = 2 Then
      TChart.Series(0).asPoint.Pointer.HorizontalSize = 5
  ';Else
      ';TChart1.Series(0).asPoint.Pointer.HorizontalSize = 2
  End If
End Sub
Nothing happens -- not even the debug.print

Posted: Tue Mar 29, 2005 12:23 pm
by Pep
Hi,

I've just test it here, and it works fine (using the latest v7.03), and adding the following code in the example included with the installation :

Code: Select all

Private Sub TChart5_OnGetSeriesPointerStyle(ByVal SeriesIndex As Long, ByVal ValueIndex As Long, AStyle As TeeChart.EPointerStyle)
If ValueIndex = 1 Then
    TChart5.Series(0).asPoint.Pointer.HorizontalSize = 10
Else
    TChart5.Series(0).asPoint.Pointer.HorizontalSize = 20
End If
End Sub
Example under :
F:\Program Files\Steema Software\TeeChart Pro v7 ActiveX Control\Examples\MSOffice\VBA Access