用 DELPHI 的 VXD 解决启动时ctrl+alt+del可结束任务的问题。 (100分)

  • 主题发起人 主题发起人 boyD
  • 开始时间 开始时间
B

boyD

Unregistered / Unconfirmed
GUEST, unregistred user!
用 DELPHI 的 VXD 解决启动时ctrl+alt+del可结束任务的问题。 ;
 
如果你想把这个功能干掉,用api函数都可以啊。
procedure TForm1.FormCreate(Sender: TObject);   var tmp,Flag :integer;
begin
  tmp := 0;
Flag := 1;
  //屏蔽 Alt-Tab
  SystemParametersInfo( SPI_SETFASTTA-SKSWITCH, Flag, @tmp, 0);
  //屏蔽 Ctrl-Alt-Del
  SystemParametersInfo( SPI_SCREENSAVERRU-NNING,Flag, @tmp, 0);  
end;
  当你要恢复功能键时用以下代码:
Flag := 0;
SystemParametersInfo(SPI_SCREENSAVERRU-NNING,Flag,@temp,0);
 
老兄,你的在98有用,2000、nt不行啊
 
后退
顶部