我的程序的运行系统为2000以上,我在开发程序的过程中想屏蔽掉WINDOW键(在Ctrl和Alt)之间的键,通过它可以打开工具栏和开始菜单)和Ctrl+Alt+Delete?
请问各位大侠们,有谁知道请告诉小菜鸟,不胜感谢!

解决方案 »

  1.   

    当你不需要让用户按Alt+Enter、Ctrl+Alt+Del、Ctrl+Esc等功能键的时候加入以下代码:
    Var
    temp:integer;
    begin
    SystemParametersInfo(Spi_screensaverrunning,1,@temp,0);
    end;
      当你要恢复功能键时用以下代码:
    Var
    Temp:integer;
    begin
    SystemParametersInfo(spi_screensaverrunning,0,@temp,0);
    end;
      

  2.   

    有必要令该功能键失去作用,所以我们使用了窗体的OnKeyDown事件来检测击键:
    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
    begin
    if (ssAlt in shift)and(key=115) then key:=0;
    end;
    你查一下那个键对应的数字值//向上 编的一样!!