当前位置: 源码素材网 » Delphi源码 » 系统相关 » 详情页

Delphi 锁定鼠标和键盘 10秒后解锁

本源码主要演示Delphi 锁定鼠标和键盘 10秒后解锁,数字键、字母键和大部分功能键以及鼠标全部键都将锁定不能操作,但对键盘中的“Power”键、“Sleep”键、“WakeUp”键无效。锁定10秒后会自动解锁。
  begin
   if lock('USER32.DLL', 'BlockInput', @forbid) then
   begin
   forbid(True); // 禁止键盘鼠标
   Sleep(10000); // 等待10秒
   forbid(False); // 允许键盘鼠标
   end;
  end;

  • 相关标签:锁定键盘 锁定鼠标
  • 调试环境:Delphi7+
  • 文件大小:6.39K
  • 资源评级:
  • 更新时间:2019-05-14
  • 相关链接:暂无演示

源码测试截图:

Delphi 锁定鼠标和键盘 10秒后解锁运行截图

相似源码:锁定键盘 锁定鼠标 Delphi源码下载:Delphi 锁定鼠标和键盘 10秒后解锁 测试截图

下载地址:

暂无相关的Delphi源码!

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“Delphi 锁定鼠标和键盘 10秒后解锁”源代码侵犯了您的权益,请尽快告诉我们。