form里面的keydown和mousedown里面编写!

解决方案 »

  1.   

    procedure Tform1.KeyPress(Sender: TObject; var Key: Char);
    begin
      Key:=#0;
    end;
      

  2.   

    只能用hook了.
    windows api的调用.
      

  3.   

    zsz0401() 
    这只对当前的FORM有用,对系统没有用的!
      

  4.   

    使用HOOK,但是无法屏蔽Ctrl+Alt+Del, Win键等系统功能键
    9x下可以用其他方式屏蔽Ctrl+ALt+Del
    2000/NT下似乎只有编写设备驱动才能屏蔽Ctrl+Alt+Del等
      

  5.   

    那到底用那种HOOK呢?请给源码。谢谢
      

  6.   

    分keyboard hook和mouse hook两种
    用KEYBOARD HOOK就可以了