# MouseDown 和 MouseUp 事件

用户单击鼠标按键时发生。用户按下鼠标按键时发生 MouseDown 事件;用户释放鼠标按键时发生 MouseUp 事件。

语法

对于多页和 TabStrip

Sub object_MouseDown( index, Button, Shift, X, Y)

Sub object_MouseUp( index, Button, Shift, X, Y)

对于其他控件
Sub object_MouseDown( Button, Shift, X, Y)

Sub object_MouseUp( Button, Shift, X, Y)

MouseDown 和 MouseUp 事件的语法包含以下成分:

成分 说明
object 必需。一个有效的对象。
index 必需。发生特定事件的多页和 TabStrip 中的页索引或标签索引。
Button 必需。标识引起该事件的鼠标按键的整数值。
Shift 必需。规定 Shift、Ctrl 和 Alt 的状态。
X, Y 必需。窗体、框架或页的位置的横坐标与纵坐标,以磅为单位,分别从左边和顶边开始测量。
设置

Button 的设置如下:

常量 说明
fmButtonLeft 1 按下左键。
fmButtonRight 2 按下右键。
fmButtonMiddle 4 按下中键。

Shift 的设置如下:

说明
1 按下 Shift。
2 按下 Ctrl。
3 同时按下 Shift 和 Ctrl。
4 按下 Alt。
5 同时按下 Alt 和 Shift。
6 同时按下 Alt 和 Ctrl。
7 同时按下 Alt 、Shift 和 Ctrl。

用于标识键盘组合键的常量:

常量 说明
fmShiftMask 1 检测 Shift 的标记。
fmCtrlMask 2 检测 Ctrl 的标记。
fmAltMask 4 检测 Alt 的标记。
说明

对于多页,MouseDown 事件发生在用户在控件上按下鼠标按键的时候。

对于 TabStrip,索引参数标识用户单击的标签。索引为 -1 时,表示用户没有单击标签。例如,如果控件的右上角没有标签,单击右上角会将索引值置为 -1。

对于窗体,在空白区、记录选择器或滚动条上按下和释放鼠标按键会产生 MouseDown 和 MouseUp 事件。

与鼠标有关的事件序列:

  • MouseDown
  • MouseUp
  • Click
  • DblClick
  • MouseUp

MouseDown 或者 MouseUp 事件过程规定了按下或释放鼠标按键时应执行的动作。MouseDown 和 MouseUp 事件能够区别鼠标的左、右、中按钮。也可以为使用 Shift、Ctrl 和 Alt 键盘组合键的鼠标—键盘组合编写代码。

如果在鼠标指针在窗体或控件上时按下鼠标按键,该对象“捕捉”鼠标并接收所有的鼠标事件,直到并包含最后的 MouseUp 事件。这意味着鼠标事件返回的鼠标指针的 X,Y 坐标不会总在接收这些事件的对象的边界之内。

如果鼠标按键被连续按下,捕捉鼠标的对象接收所有连续的鼠标事件,直到所有的按键被释放。

用 Shift 参数标识在 MouseDown 或 MouseUp 事件发生时 Shift、Ctrl 和 Alt 的状态。例如,如果 Ctrl 和 Alt 被同时按下,则 Shift 的值为 6。

应用于