关于光标停留在BUTTON上时触发一个事件的问题！

Question

在Button的OnMouseMove中加入：
if button1.caption = 'a' then
  button1.caption := 'b'
else if button1.caption = 'b' then
  button1.caption := 'a'

Answer 1

如果是鼠标的话，则在BUTTON的OnMouseMove事件上写代码：
 button.caption := 哈哈！如果是buttton获得焦点的话，则：
 if button.focused then
   button.caption := 哈哈！
   

Answer 2

用OnEnter事件，但焦点移到该控件上时就会触发。

Answer 3

而OnExit事件是当焦点移去时触发

Answer 4

在OnMouseMove事件里面写
   Button.caption:=新的标题;
在OnExit事件里面写
   Button.caption:=旧标题

Answer 5

回复人：　962veiri(风尘旅人)　(2001-10-30 17:15:53)  得0分 
在OnMouseMove事件里面写
  Button.caption:=新的标题;
在OnExit事件里面写
  Button.caption:=旧标题 
这个好像不行！！！！

Answer 6

用OnEnter事件，但焦点移到该控件上时就会触发，而OnExit事件是当焦点移去时触发。
其他方法也许可以实现 ，但无疑这是DELPHI的设计者要你采用的方法。

Answer 7

当鼠标滑到控件上时触发onMouseMove事件，但是当鼠标离开时触发什么事件？

Answer 8

在button的onmousemove事件中写
if Button.caption:=旧的标题;
Button.caption:=新的标题;在form的onmousemove事件中写
if Button.caption:=新的标题; 
Button.caption:=旧的标题;

Answer 9

在button的OnMouseMove事件里面写
if Button.caption:=旧标题 
  Button.caption:=新的标题;
在form的OnMouseMove事件里面写
if Button.caption:=新标题 
 Button.caption:=旧标题 
 

Answer 10

如果在onEnter中加代码的话，程序一启动这段代码就就已经执行了，而在onExit中写根本没有一点变化！行不通，现在就是不能在鼠标离开后回归原位！
哈哈！不错，hlilna的答案相当准确！谢谢了！分马上就到，不过也要给别人一点哦！

Answer 11

给hlilna：还是不行，不能在form的onMouseMove中用这段代码，因为鼠标只在窗体内移动时，caption的值就不停地变化，我只需要在form 和button两者之间切换时才让caption变化。

Answer 12

根本不能靠在任何控件的onMouseMove中加代码来解决，因为如果加了代码，比如你在按钮的事件onMouseMove中加了语句的话，只要你在按钮上移动，它的caption就发生变化。
看来只有加一个Timer控件，让他通过判断按钮是否得到焦点来改变caption值了，看来最终的分只有加给自己了。真是的！