如何使鼠标按住一个按钮不动重复执行,就如TUpDown一样按住不放时和它联系的Edit就不停增加(50分)

  • 主题发起人 主题发起人 kun
  • 开始时间 开始时间
鼠标按下时用定时器定时处理增加。
 
判断鼠标的状态,发送鼠标左键按下的消息
 
用timer,down时true,up时false,当然还有别的处理
 
用递归在该button的mousedown事件中处理和它联系的Edit增加 ,并调用该button的mousedown事件.在mouseup
中终止。
(NO test!)
 
在控件的mousedown中编写代码就行了,当然,一直按下不放时,两次mousedown时间的触发时可以自己写程序控制的
 
不知道TUpDown的原代码是怎么样的我怎么找不到呢
 
用timer控件最简单了,呵呵。剩下的你自己想啦[:)]
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部