如何禁止其他程序关闭？

如题不是禁止关机
procedure tform1.WMClose(var msg:TMessage);
begin
msg.Result:=0;
end;
我是这样的
可是对别的程序不起作用，自己的程序倒是关不了了
==========================================================
此外，还有一个问题：通常，一个程序若弹出一个对话框（showmessage('xxxxx');）时程序的主界面是无法操作的，请问要如何才能实现弹出对话框时使主界面同时也可以操作？
（不是对于我的程序，是使别人的程序在弹出对话框时同时可操作主界面）