MouseUp event
The MouseUp event has different arguments for different
objects:
|
Object |
See |
|---|---|
|
RichTextEdit control |
|
|
Window |
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 |
Parameters
None
Return Values
Long. Return code choices (specify in
a RETURN statement):
-
0 Continue
processing
Usage
A Clicked event also occurs when the mouse button is released.
Examples
The following code in a RichTextEdit control’s
MouseUp event assigns text to the SingleLineEdit sle_1 when
the user releases the left mouse button:
|
1 |
sle_1.Text = "Mouse Up" |
See Also
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 |
Parameters
|
Argument |
Description |
|---|---|
|
flags |
UnsignedLong by Values are:
In the MouseUp event, the left mouse button is being released, so |
|
xpos |
Integer by value |
|
ypos |
Integer by value |
Return Values
Long. Return code choices (specify in
a RETURN statement):
-
0 Continue
processing
Usage
A Clicked event also occurs when the mouse button is released.
Examples
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.
|
1 |
sle_2.Text = "Position of Pointer is: " + & |
|
1 |
   String(xpos) + "," + String(ypos) |
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.
|
1 |
CHOOSE CASE flags |
|
1 |
   CASE 0 |
|
1 |
      sle_mkey.Text = "No modifier keys pressed" |
|
1 |
|
1 |
   CASE 4 |
|
1 |
      sle_mkey.Text = "SHIFT key pressed" |
|
1 |
|
1 |
   CASE 8 |
|
1 |
      sle_mkey.Text = "CONTROL key pressed" |
|
1 |
|
1 |
   CASE 12 |
|
1 |
      sle_mkey.Text = "SHIFT and CONTROL keys pressed" |
|
1 |
|
1 |
END CHOOSE |