★★★鼠标滚轮事件:<br> 由TWinControl派生的控件基本上都有以下三个事件:<br>property OnMouseWheel: TMouseWheelEvent;<br> 当鼠标滚轮滚动是触发;<br>property OnMouseWheelDown: TMouseWheelUpDownEvent;<br> 当鼠标滚轮向下滚动是触发;<br>property OnMouseWheelUp: TMouseWheelUpDownEvent;<br> 当鼠标滚轮向上滚动是触发;<br> 这三个事件都有一个Shift: TShiftState类型的参数,如其值为ssMiddle<br>一般表示滚轮处于被按下的状态。<br><br>还有一个public方法处理鼠标滚轮消息:<br> procedure MouseWheelHandler(var Message: TMessage); dynamic;<br> 默认处理是将WM_MOUSEWHEEL消息转换为CM_MOUSEWHEEL消息送给控件处理;<br><br>//那么鼠标中间的滚轮按下的消息和向上滚动或向下滚动的消息是什么?<br>都是这个WM_MOUSEWHEEL消息。<br><br>