Question

怎样让delphi中的关闭按钮现实退出整个程序 而不是退出当前窗口?

Answer 1

如果想退出整个程序，你可以直接使用Appliction的函数：

procedure TForm1.btn2Click(Sender: TObject);
begin
Application.Terminate;
end;

Answer 2

在软件的主窗口上点击右上角那个关闭按钮，就关闭了整个程序，无需写代码的。

Answer 3

退出程序的格式为：
cIose ＜主窗口名＞；