![]() | Type | Description |
The following sample changes the node's value Foreground color while cursor hovers the control:
Dim nOld As EXMLGRIDLibCtl.Node
Private Sub XMLGrid1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
With XMLGrid1
Dim n As EXMLGRIDLibCtl.Node, h As EXMLGRIDLibCtl.HitTestEnum
h = .HitTest(X / Screen.TwipsPerPixelX, Y / Screen.TwipsPerPixelY, n)
If Not nOld Is n Then
If Not nOld Is Nothing Then
nOld.ClearForeColorValue
nOld.ClearForeColorValue
End If
If Not h = 0 Then
n.ForeColorValue = vbGreen
n.ForeColorValue = vbBlue
End If
End If
Set nOld = n
End With
End Sub