是否有一个Delphi事件保证在应用程序终止时但在任何表单被销毁之前被调用？

是的，在Delphi应用程序中，有一个事件可以确保在应用程序终止时但在任何表单被销毁之前被调用。这个事件就是Application.OnException事件。当应用程序中发生异常时，这个事件会被触发，允许您在应用程序终止之前执行一些操作，例如记录错误信息、释放资源等。

您可以在应用程序的主单元（例如main.pas）中设置Application.OnException事件处理程序，如下所示：

Application.OnException := ApplicationException;

然后，您需要实现ApplicationException方法，如下所示：

procedure TMainForm.ApplicationException(Sender: TObject; E: Exception);
begin
  // 在这里执行您需要的操作，例如记录错误信息、释放资源等
  // 当您完成操作后，您可以选择继续异常处理或者终止应用程序
  // 如果您选择继续异常处理，请确保将异常传递给父方法
  // 例如：
  // inherited;
end;

通过使用Application.OnException事件，您可以确保在应用程序终止时但在任何表单被销毁之前执行您的代码。