GefScreen.IsMouseInScreen (read-only property)

Indicates if the mouse cursor is within the screens drawing area.
Syntax: Boolean = object.IsMouseInScreen
Description: This property indicates if the mouse cursor is within the screens drawing area.



Example:

Sub OnUnhighlight(highlightReason As Long)
  Dim var As DGefObjectVariable
  Set var = CimGetScreen().Object.Variables.Item("var")
  If CimGetScreen().IsMouseInScreen Then
    var.Value = Chr$(34) & "Mouse on other object." & Chr$(34)
  Else
    var.Value = Chr$(34) & "Mouse exited screen." & Chr$(34)
  End If
  CimGetScreen().Refresh False
End Sub