在显示弹出式对话框的时候，如何实现系统挂起？

Question

这是个弹出式对话框：
windows.messagebox(0,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST);在2000下这个对话框显示在所有窗体的最前面，但是你还是能够响应其它的程序（比如还能继续在记事本上打字），我的要求是如何对话框一显示，整个系统挂起，在没有结束这个对话框的时候，其它任何程序用鼠标或者键盘都无法响应？？？

Answer 1

这些人把问题想的这么难,试试下面的.
windows.messagebox(Application.handle,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST);

Answer 2

错了,是下面的.
windows.messagebox(Application.handle,'标题','警告错误',MB_ICONWARNING or MB_TOPMOST or MB_SYSTEMMODAL);