申请终止帮助

时间:2009-12-17 10:13:12

标签: delphi forms

在我的项目中我有两种形式,当我点击form1中的show form 2按钮时,会弹出form2,我想通过单击form2上的关闭按钮终止我的整个应用程序,

任何人都可以告诉我我该怎么做?

4 个答案:

答案 0 :(得分:16)

如果您希望调用主应用表单的Application.TerminateOnCloseQuery处理程序,请不要使用OnClose(例如,可以取消此操作或询问是否保存修改过的文件等。

你可以打电话

Application.MainForm.Close;

相反,来自所有形式(甚至是主要形式本身)。

答案 1 :(得分:4)

如果您的意思是单击名为Close的TButton,则在Button.OnClick事件中调用Application.Terminate;

如果您的意思是单击表单的X按钮,那么在Form2的OnClose事件中,请调用Application.Terminate;

答案 2 :(得分:0)

另一种选择是将wm_Close消息发送到application / application.mainform

PostMessage(Application.Handle,wm_Close,0,0);

PostMessage(Application.MainForm.Handle,wm_Close,0,0);

这会将关闭请求放入消息队列中,消息队列中已有的现有消息将继续首先处理。

答案 3 :(得分:-4)

最简单的模式是用户 TerminateProcess(GetCurrentProcessID,0); 没有问,没有冻结,没有s * iet。