关于判断鼠标位置的问题

Question

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  鼠标移动到图片上的事件～～
end;procedure TForm1.MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  鼠标移动到图片上的事件～～
end;procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  鼠标在Form上移动的事件～（也就是鼠标离开图片的的事件）
end;

Answer 1

写错了～呵呵～～
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  鼠标移动到图片上的事件～～
end;procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  鼠标在Form上移动的事件～（也就是鼠标离开图片的的事件）
end; 

Answer 2

没用呀，我在图片上按住鼠标左键，并且拖动鼠标离开图片，这时鼠标指针已经在窗体上了，可是不触发窗体的mousemove事件呀如果没按住鼠标键的时候是可以触发mousemove事件的，可按住后就不行了

Answer 3

哎呀，用TSpeedButton，选择一个包含两幅图片的图片文件作为按钮的图片就可以了。