Nachtrag - natürlich zum Schluss noch:
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
{Abfolge: 1. X -> Form.CloseQuery -> Form.Close -> Form.Hide}
begin
....
ShutdownBlockReasonDestroy(Application.Handle);
....
end;