ALT+F4屏的话,你只要在Form的CloseQuery中写到CanClose:=False;CTRL+ALT+DEL的话你看下面的代码
Use shellapi;
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external 'KERNEL32.DLL';
  RegisterServiceProcess(GetCurrentProcessID,1);//在程序一启动就不让它显示在任务列表中

解决方案 »

  1.   

    1,控制热启动键 Ctrl+Alt+Del:
      要使系统的热启动键 Ctrl+Alt+Del 失效,使用以下语句:
        SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, 0, 0);
      恢复使用以下语句:
        SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, 0, 0);2,使窗体的 Alt+F4 快捷键(关闭窗体)失效
       把 Form 的 KeyPreview 设为 True,然后响应 OnKeyDown 事件:
        procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);
        begin
          if (Key=VK_F4) and (ssAlt in shift) then
            Key :=0;
        end;
      

  2.   

    任务栏上看不见
    showwindow(application.handle,sw_hide)