如何在应用程序中屏蔽Alt+F4等功能键？

Question

http://www.csdn.net/Expert/forum.asp?typenum=8&searchKeys=Alt%2BF4&roomid=3&author=&tabletype=now

Answer 1

在
type
  TForm1 = class(TForm)后，Private前面写：
procedure SysCommand(var msg:TWMSysCommand);message WM_SysCommand;然后实现之：
procedure TForm1.SysCommand(var msg: TWMSysCommand);
begin
  if msg.CmdType = SC_CLOSE then
  begin
    msg.cmdtype:= SC_DEFAULT;
    Hide;
  end;
  inherited;
end;
即可。
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样，删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 2

这个问题我解决过!
在窗体的ONCloseQuery里写一段代码!