WindowSplitter.ChangeMouseCursor Event

Use this event to use customized Mouse Cursors.

ChangeMouseCursor(
mouseOverActiveArea as Boolean,
clicked as Boolean)

Parameters

mouseOverActiveArea: True if the Mouse is within the clickable area of the WindowSplitter else false.
clicked: True if the Cursor change request came from clicking the clickable area of the WindowSplitter else false.

Remarks

REALbasic 2005 or later will by default use nice operating system defined WindowSplitter Mouse Cursors for the WindowSplitter control. Because REALbasic older than 2005 cannot do that then when using REALbasic older than 2005 the mouse cursors will always need to be set.

Example of using custom Mouse Cursors

Sub ChangeMouseCursor(mouseOverActiveArea as Boolean,clicked as Boolean)
    if clicked then
       me.MouseCursor= ClosedHand
    elseif mouseOverActiveArea then
       me.MouseCursor = OpenHand
    else
       me.MouseCursor = ArrowCursor
    end if
End Sub

If there is any code in this event then the default internal handling is turned off.

WindowSplitter.ChangeMouseCursor Event

Parameters

Remarks

See Also