控制 鼠标和键盘 的问题————————在线等待！！！！！！！

大家好：
      我想用 Delphi 写一个用来控制键盘和鼠标的应用程序，在此应用程序行时能锁住
键盘上所有的键（除 Shift 键外）和鼠标，在程序关闭时解开键盘和鼠标。一定不要锁住
Shift 键！