放一有hwnd的控件在你的热区,大小跟你的热区一样大。
然后在控件的mousemove事件中加入
if x > 0 and x < ###.width and y>0 and y < ###.height then
if not mousein then
(call your sub wher enter the hot zero)
mousein = true
setcapture ###.hwnd
end if
else
(call your sub when leave the hot zero)
releasecapture
end if