VCL中TForm.OnCreate事件异常未向外抛出，如何处理更合理？

重写HandleCreateException返回False的利弊 #

• 利：确实可以直接让OnCreate中的未处理异常穿透到窗体构造函数的调用外层，进入你写的try...except块，同时Delphi构造函数抛出异常时会自动执行已创建资源的清理逻辑，不会留下半初始化的窗体对象，从根源解决你说的难排查的问题。
• 弊：
  1. 会改变VCL默认的异常处理行为，如果你的项目里存在很多没有加外层异常捕获的动态窗体创建逻辑，原来只会弹出错误提示的场景现在会直接触发未捕获异常导致程序退出。
  2. 如果是项目自动创建的主窗体/全局窗体，启动阶段抛出的异常会直接导致应用完全无法启动，没有降级处理的空间。
  3. 极少数老旧版本的VCL在该返回值为False时可能存在资源泄漏的边缘case，需要自己针对性做兼容性测试。

更推荐的方案 #

优先推荐不在OnCreate事件中写可能抛出异常的业务初始化逻辑，把这部分逻辑拆分到独立的自定义初始化方法：

try
  Frm := TBooForm.Create(Application);
  try
    Frm.Init; // 原本写在OnCreate里的可能抛异常的逻辑移到这里
    Frm.ShowModal;
  finally
    Frm.Free;
  end;
except
  // 这里可以正常捕获到Init方法里的所有异常
end;

这个方案的优势是完全不修改VCL原生行为，兼容性最好，也不会影响其他旧代码的运行逻辑，是业内通用的最佳实践。

如果你一定要保留OnCreate里的原有逻辑，那重写基类HandleCreateException的方案是可行的，只需要提前做好全项目的异常捕获覆盖即可，没有本质上的严重缺陷。

内容的提问来源于stack exchange，提问作者yonojoy