S szhcracker Unregistered / Unconfirmed GUEST, unregistred user! 2008-08-25 #2 屏蔽Alt+F4需要捕捉WM_SYSCOMMAND消息,然后作出判断。 procedure WMSysCommand(var Msg: TMessage); begin if Msg.wParam <> SC_CLOSE then inherited; end;
屏蔽Alt+F4需要捕捉WM_SYSCOMMAND消息,然后作出判断。 procedure WMSysCommand(var Msg: TMessage); begin if Msg.wParam <> SC_CLOSE then inherited; end;