Type | Description |
The following sample changes the node's value background 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.ClearBackColorValue nOld.ClearForeColorValue End If If Not h = 0 Then n.BackColorValue = vbGreen n.ForeColorValue = vbBlue End If End If Set nOld = n End With End Sub