如何阻止程序结束运行？

Question

我想在程序结束之前，强制执行某些操作，否则不可以结束程序运行，怎么做？在窗体的ondestroy事件中写exit不行，这是为什么？

Answer 1

exit只是退出本过程，不让本过程EXIT后的程序再运行，并不能阻止整个程序或本过程以外的语句执行。要不让程序结束，可以用消息处理。
还可以试试在ONCLOSE或ONDESTROR事件里加MESSAGEBOX判断是否结束，第二种方法是刚刚想到的，没有测试过，：）！

Answer 2

onclose也不行，消息处理怎么写呢？谢谢.

Answer 3

在OnCloseQuery中写代码。
看到这个过程带了一个CanClose的参数了吗？
如果CanClose:=True;则窗口可关闭，否则不能关。

Answer 4

楼上的方法可以；不过前提是窗体是用showmodal方法显示的；