如何使IMAGE控件响应ONMOUSEOVER事件?

Question

在ONMOUSEMOVE事件中设置鼠标形状时鼠标一移动就闪,我想在ONMOUSEOVER中设置,请问应该怎么设置啊?

Answer 1

mouse OVER？这是啥玩意儿？你自己的发明么？

Answer 2

设置鼠标形状也不用这样吗,直接设置Image的Cursor就行了

Answer 3

就是鼠标悬停在IMAGE控件 上时的消息

Answer 4

image1.Cursor:=LoadCursor(0, IDC_HAND); 这样吗?不管用啊

Answer 5

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Screen.Cursor:=crHourGlass;
end;这样的？ 

Answer 6

screen.Cursor:=LoadCursor(0, IDC_HAND);我想加自定义的鼠标啊,这样也不行啊,并且鼠标移出去了还是那个样式

Answer 7

我记得是OnMouseEnter事件啊，
在鼠标进入Image范围就会触发，在鼠标移出之前不会再执行第二次。
跟OnMouseMove不一样的，
OnMouseMove是鼠标移动就触发，它会在很短时间执行许多次的，所以会闪。
OnMouseLeave与OnMouseEnter相对的。其实要改变鼠标形状，只需要设置image的Cursor就可以了。
把OnMouseMove删掉即可。