TRect lockmouse=Panel1->BoundsRect; 限制在Panel1中
//TRect lockmouse=Form1->ClientRect //限制在窗体中
MapWindowPoints(Handle,0,(LPPOINT)(&lockmouse),2);
ClipCursor(&lockmouse);
//释放鼠标
ClipCursor(0);
TRect lockmouse=Panel1->BoundsRect; 限制在Panel1中
//TRect lockmouse=Form1->ClientRect //限制在窗体中
MapWindowPoints(Handle,0,(LPPOINT)(&lockmouse),2);
ClipCursor(&lockmouse);
//释放鼠标
ClipCursor(0);