易语言写鼠标键盘锁，恢复常规运作状态

rect.左边 ＝ _启动窗口.左边 ＋ 20
rect.顶边 ＝ _启动窗口.顶边 ＋ 8
rect.右边 ＝ _启动窗口.左边 ＋ _启动窗口.宽度 － 20
rect.底边 ＝ _启动窗口.顶边 ＋ _启动窗口.高度 － 28
.判断开始 (开关.标记 ＝ “off”)
真彩图片.从句柄创建 (开关.取窗口句柄 (), 真彩控件_载入内存图片 (#on))
真彩窗口.刷新子控件 ()
XX ＝ API_lstrcpyn (rect, rect, 0)
调试输出 (XX)
API_ClipCursor (XX)
锁定键盘 ()
开关.标记 ＝ “on”
真彩按钮.置图片数据 (#onan, , , )
.默认
真彩图片.从句柄创建 (开关.取窗口句柄 (), 真彩控件_载入内存图片 (#off))
API_ClipCursor (0)
解除锁定 ()
开关.标记 ＝ “off”
真彩按钮.置图片数据 (#offan, , , )
真彩窗口.刷新子控件 ()

.DLL命令 API_ClipCursor, 整数型, "user32", "ClipCursor", , 将指针限制到指定区域。ClipCursorBynum是一个别名，允许我们清除以前设置的指针剪切区域 非零表示成功，零表示失败。会设置GetLastError
.参数 矩形区域, 整数型, , RECT，指定一个矩形，用像素屏幕坐标系统表示。鼠标指针必须在这个区域内运动。如使用函数的ClipCursorBynum形式，则可将参数设为Long值，用它传递一个0，禁止指针剪切，恢复常规运作状态;

.DLL命令 API_lstrcpyn, 整数型, "kernel32", "lstrcpynA"
.参数 lpString1, RECT
.参数 lpString2, RECT
.参数 iMaxLength, 整数型