本文整理自网络,侵删。
下面把鼠标的移动区域限制在(100,100,200,200)
var
rect:TRect;
begin
rect.Left:=100;
rect.Top:=100;
rect.Bottom:=200;
rect.Right:=200;
windows.ClipCursor(@rect);
end;
恢复鼠标的移动区域
windows.ClipCursor(0);
相关阅读 >>
Delphi tarray<tarray<string>> 用法
Delphi获取jpg、gif、png等格式图片的大小(高度和宽度)
Delphi tms web core messagedlg对话框用法
Delphi system.sysutils.tmarshaller 与 system.tmarshal
更多相关阅读请进入《Delphi》频道 >>