MouseDown

The MouseDown event has different arguments for different objects:

Object

See

RichTextEdit control

Syntax 1

Window

Syntax 2


Syntax 1: For RichTextEdit controls

Description

Occurs when the user presses the left mouse button on the RichTextEdit control.

Event ID

Event ID

Objects

pbm_renlbuttondown

RichTextEdit


Arguments

None

Return Values

Long.

Return code choices (specify in a RETURN statement):

0 -- Continue processing

Examples

This code in a RichTextEdit control's MouseDown event assigns text to the SingleLineEdit sle_1 when the user presses the left mouse button:

sle_1.text = "Mouse Down"

See also

Clicked

MouseMove

MouseUp

Syntax 2: For windows

Description

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

Event ID

Event ID

Objects

pbm_lbuttondown

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 MouseDown event, the left mouse button is always down, so 1 is always 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).


Return Values

Long.

Return code choices (specify in a RETURN statement):

0 -- Continue processing

Examples

Example 1

This code in the MouseDown event displays the window coordinates of the pointer as reported in the xpos and ypos arguments:

sle_2.Text = "Position of Pointer is: " + &
   String(xpos) + "," + String(ypos)

Example 2

This code in the MouseDown event checks the value of the flags argument, and reports which modifier keys are pressed in the SingleLineEdit sle_modkey:

CHOOSE CASE flags
   CASE 1
      sle_mkey.Text = "No modifier keys pressed"
   CASE 5
      sle_mkey.Text = "SHIFT key pressed"
   CASE 9
      sle_mkey.Text = "CONTROL key pressed"
   CASE 13
      sle_mkey.Text = "SHIFT and CONTROL keys pressed"
END CHOOSE

See also

Clicked

MouseMove

MouseUp