Page 1 of 1

Large Cursor

Posted: Tue Dec 16, 2003 1:34 pm
by 9078641
Is there anyway to implement a large cross hair cursor ?

Posted: Wed Dec 17, 2003 12:41 pm
by Pep
Hi Hans,

I'm not sure what you mean, if you are referencing to the width of the Cursor the you can do the following (using the CursorTool) :

TChart1.Tools.Items(0).asTeeCursor.Pen.Width = 5

Josep Lluis Jorge
http://support.steema.com

Posted: Wed Dec 17, 2003 10:46 pm
by 9078641
Pep wrote:Hi Hans,

I'm not sure what you mean, if you are referencing to the width of the Cursor the you can do the following (using the CursorTool) :

TChart1.Tools.Items(0).asTeeCursor.Pen.Width = 5

Josep Lluis Jorge
http://support.steema.com
Think of the small system crosshair cursor but extend the cross from bottom to top and from left to right of the chart.

This type of cursor is used a lot in CAD programs. AutoCad has it.

I can send you an image if that does not explain it.

Thanks.

Posted: Thu Dec 18, 2003 9:55 am
by Pep
Hi Hans,

the best way to do this is using a CursorTool and then hide the MourseCursor when the Mouse is over the Chart using the following code :

Code: Select all

Private Sub TChart1_OnMouseMove(ByVal Shift As TeeChart.EShiftState, ByVal X As Long, ByVal Y As Long)
With TChart1
If X >= .Axis.Left.Position And _
   X <= .Axis.Right.Position And _
   Y >= .Axis.Top.Position And _
   Y <= .Axis.Bottom.Position Then
    TChart1.Cursor = -1
Else
    TChart1.Cursor = 21
End If
End With
End Sub
Josep Lluis Jorge
http://support.steema.com