{
使用Windows API函數(shù) ClipCursor, 可以限制鼠標在屏幕中指定的矩形范圍里移動:
}

//限制鼠標在窗體中的移動
//并在單擊窗體后釋放鼠標
procedure TForm1.FormCreate(Sender: TObject);
var r : TRect;
begin
//加限制前先把鼠標移動到指定的矩形范圍里
r := BoundsRect;
ClipCursor(@R);
end;

procedure TForm1.FormClick(Sender: TObject);
begin
//要釋放鼠標
ClipCursor(nil);
end;

轉(zhuǎn)載于:https://www.cnblogs.com/myamanda/articles/1523173.html

與50位技術(shù)專家面對面20年技術(shù)見證，附贈技術(shù)全景圖

總結(jié)

以上是生活随笔為你收集整理的限制鼠标在窗体中的移动的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。