تشخیص خروج ماوس از روی کنترل

[دلفــي]

سلام علیکم
در بخش نکات برنامه نویسی دلفی یه کد دیدم که با استفاده از چیزی مثل:

procedure CMMouseLeave(var AMsg: TMessage); message CM_MOUSELeave;

کار می کرد که نتونستم فرقش رو با استفاده کردن از رویداد OnEnter,OnExit بفهمم که ربطی به ماوس ندارند و فقط مساله فوکوس رو بررسی می کنند.
من میخوام بدون تایمر بفهمم که آیا ماوس هنوز روی Image هست یا نه؟

procedure TForm1.Image1MouseEnter(Sender: TObject);

begin

  ShowMessage('Mouse Entered');  //  Image ورود اشاره گر روی

end;





procedure TForm1.Image1MouseLeave(Sender: TObject);

begin

  ShowMessage('Mouse Leaved');  //  Image خروج اشاره گر از روی

end;