本文整理自网络,侵删。
下面把鼠标的移动区域限制在(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 判断图像格式bmp jpg gif pcx png psd ras sgi tiff err
Delphi格式化函数format、formatdatetime和formatfloat
更多相关阅读请进入《Delphi》频道 >>