delphi 关闭 MDI 子窗体

在Delphi中，所有窗体关闭时都会调用OnClose过程。
该过程的Action: TCloseAction变量决定窗体的关闭方法。
对于SDI子界面，默认是caHide，也是就隐藏。
对于MDI子界面，默认是caMinimize，也就是最小化。
你可以在窗体的OnClose过程中设置Action为caFree，就可以正常关闭窗体了。

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;