在VB里面有一个OnMouseOver 事件，Delphi如何实现呢？我看见许多组件都没有这个事件...

请问OnMouseOver 事件是作什么用的？

解决方案 »

  1.   

    OnMouseMove就是你想要的那个事件.
    其实有好多方法的,例如在onmousemove的时候判断坐标值,或者干脆是写一个总体判断的函数,然后把每个组件的onmouseMove时间都连上,这是我一般使用的方式.
      

  2.   

    如果纯粹用 onmousemove 按钮， 则鼠标移动时，会触发好多次该事件，现象是
    按钮在闪烁！  如果再加上坐标判断， 则情况会好一些。
      

  3.   

    在uses之后加入    Procedure ONMouseMove(var msg:Tmessage);MessageWM_MOUSEMOVE ;并在实现部分重载它