button事件

有个button执行的事件是窗体向右移动，我点一下它就一动一定的距离，我现在想用鼠标一直点着button鼠标不抬起，一直执行BUTTON的事件即窗体就一直向右移动，如何做

解决方案 »

  1.   

    用一个Time控制，在button的OnMouseDown中激活Time，在button的OnMouseUp中禁止Time，在Time的OnTime中做移动操作。
      

  2.   

    你需要用一个连续被触发的事件 比方timer 这样可以延时一下 如果用循环那会 移动得飞快可以用一个 全局变量 按下时设为 真 驱动timer事件 放开鼠标时设为 假  关闭timer
      

  3.   

    同意楼上的,只要把timer的触发时间设置好就行了。
      

  4.   

    用Timer都不好。你的意思好象是鼠标点着按钮，窗体移动，当然按钮也随窗体移动。鼠标却没有移动。你好象是想鼠标也跟着移动，对吗？
        如果是这样，你可以在按钮事件中（处理移动窗体的事件中），每移动窗体，也移动鼠标,不就可以了吗？
        有关鼠标移动的函数。
        SetCursorPos