Delphi中限制鼠标的移动区域


本文整理自网络,侵删。

 下面把鼠标的移动区域限制在(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 程序嵌入桌面效果的实现

Delphi 结束360safe和360保险箱进程

Delphi 将memo转化为jpg输出

Delphi tms web core messagedlg对话框用法

Delphi检查getelementbyid返回值的有效性

Delphi10 一段汇编程序

Delphi system.sysutils.tmarshaller 与 system.tmarshal

Delphi 小票打印开钱箱 自动切纸指令

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...