MouseUp

The MouseUp event has different arguments for different objects:

Object

See

RichTextEdit control

Syntax 1 For RichTextEdit controls

Window

Syntax 2 For windows


Syntax 1 For RichTextEdit controls

Description

Occurs when the user releases the left mouse button in a RichTextEdit control.

Event ID

Event ID

Objects

pbm_renlbuttonup

RichTextEdit

Arguments

None

Returns

Long. Return code choices (specify in a RETURN statement):


Syntax 2 For windows

Description

Occurs when the user releases the left mouse button in an unoccupied area of the window (any area with no visible enabled object).

Event ID

Event ID

Objects

pbm_lbuttonup

Window

Arguments

Argument

Description

flags

UnsignedLong by value (the modifier keys and mouse buttons that are pressed).

Values are:

  • 1 — Left mouse button

  • 2 — Right mouse button

  • 4 — Shift key

  • 8 — Ctrl key

  • 16 — Middle mouse button

In the MouseUp event, the left mouse button is being released, so 1 is not summed in the value of flags. For an explanation of flags, see Syntax 2 of MouseMove.

xpos

Integer by value (the distance of the pointer from the left edge of the window’s workspace in pixels).

ypos

Integer by value (the distance of the pointer from the top of the window’s workspace in pixels).

Returns

Long. Return code choices (specify in a RETURN statement):

Usage

A Clicked event also occurs when the mouse button is released.

Examples

Example 1

Example 1 This code in the window’s MouseUp event displays in the SingleLineEdit sle_2 the window coordinates of the pointer when the button is released as reported in the xpos and ypos arguments.

sle_2.Text = "Position of Pointer is: " + &

   String(xpos) + "," + String(ypos)

Example 2

Example 2 This code in the window’s MouseUp event checks the value of the flags argument and reports which modifier keys are pressed in the SingleLineEdit sle_modkey.

CHOOSE CASE flags

   CASE 0

      sle_mkey.Text = "No modifier keys pressed"


   CASE 4

      sle_mkey.Text = "SHIFT key pressed"


   CASE 8

      sle_mkey.Text = "CONTROL key pressed"


   CASE 12

      sle_mkey.Text = "SHIFT and CONTROL keys pressed"


END CHOOSE

See also