Change Cursor on Cell Mouse Enter, Mouse Leave

[Gone2TheDogs]

As there is no event for Cell Mouse Enter or Cell Mouse Leave for a GridView, What event can I use to change the Mouse Cursor when the mouse hovers over a specific Cell?

I tried using the CellFormatting event to no avail.

 

01.Private Sub dgvVenItems_CellFormatting(sender As Object, e As Telerik.WinControls.UI.CellFormattingEventArgs) Handles dgvVenItems.CellFormatting
02.    Dim font As New System.Drawing.Font(SystemFonts.DialogFont, FontStyle.Underline)
03.
04.    If e.CellElement.ColumnIndex = 0 Then
05.        e.CellElement.ForeColor = System.Drawing.Color.Blue
06.        e.CellElement.Font = font
07.        dgvVenItems.Cursor = Cursors.Hand
08.    Else
09.        e.CellElement.ResetValue(LightVisualElement.ForeColorProperty, ValueResetFlags.Local)
10.        dgvVenItems.Cursor = Cursors.Default
11.    End If
12.End Sub

[Dimitar]

Hi Bob,

Thank you for writing.

You can use the CellMouseMove event:

Private Sub RadGridView1_CellMouseMove(ByVal sender As Object, ByVal e As MouseEventArgs)
    Dim hoveredElement = radGridView1.ElementTree.GetElementAtPoint(e.Location)
    If TypeOf hoveredElement Is GridDataCellElement Then
        Dim cell = TryCast(hoveredElement, GridDataCellElement)

        If cell.Value IsNot Nothing AndAlso cell.Value.ToString() = "Sam" Then
            radGridView1.Cursor = Cursors.Hand
        Else
            radGridView1.Cursor = Cursors.Default
        End If

    End If
End Sub

I hope this will be useful. Let me know if you have additional questions.

Regards,
Dimitar
Telerik by Progress

[Gone2TheDogs]

Great example. Thank you!