(delphi11最新学习资料) Object Pascal 学习笔记---第9章第4节(全局异常处理)

9.4 全局异常处理

​ 如果事件处理器引发的异常停止了标准的执行流程,那么如果找不到异常处理器,是否也会终止程序呢?这确实是控制台应用程序或其他特殊用途代码结构的情况,而大多数可视化应用程序(包括基于 VCL 或 FireMonkey 库的应用程序)都有一个全局消息处理循环,它将每次执行都包裹在一个 try-except 块中,这样如果在事件处理器中引发异常,就会被捕获。

注解:请注意,如果在激活消息循环之前启动代码中出现异常,异常通常不会被库捕获,程序将以错误结束。通过在主程序中添加自定义 try-except 块,可以部分缓解这种行为。即使有这种程度的保护,在主程序执行之前和进入自定义 try-except 块之前,仍会运行库初始化代码,因此在此之前仍有可能发生未处理的异常。

​ 在执行过程中出现异常的一般情况下,会发生什么取决于库,但一般都有一种编程方式,可以用全局处理器拦截这些异常,或者有一种显示错误信息的方式。虽然某些细节有所不同,但 VCL 和 FireMonkey 都是如此。

​ 在前面的演示中,你看到了当异常发生时显示的简单错误信息。如果想改变这种行为,可以处理全局应用程序对象的 OnException 事件。虽然这一操作更多地与应用程序的可视化库和事件处理相关,但它也与异常处理相关,因此值得在此介绍一下。

​ 我将前面的示例称为 ErrorLog,并在主窗体中添加了一个新方法:

pascal 复制代码
public
  procedure LogException(Sender: TObject; E: Exception);

​ 在 OnCreate 事件处理器中,我添加了将一个方法挂钩到全局 OnException 事件的代码,之后,我编写了全局处理器的实际代码:

pascal 复制代码
procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnException := LogException;
end;

procedure TForm1.LogException(Sender: TObject; E: Exception);
begin
  Show('Exception ' + E.Message);
end;

注解:下一章将详细介绍如何将一个方法指针关联一个事件(如上所述)。

​ 有了全局异常处理器中的新方法,程序就能将错误信息写入输出端,而不会通过错误对话框停止应用程序。

相关推荐
sigmoidAndRELU10 分钟前
读Vista
笔记·stable diffusion·世界模型
Sincerelyplz1 小时前
【Temproal】快速了解Temproal的核心概念以及使用
笔记·后端·开源
许白掰2 小时前
【stm32】HAL库开发——CubeMX配置RTC,单片机工作模式和看门狗
stm32·单片机·嵌入式硬件·学习·实时音视频
future14122 小时前
C#学习日记
开发语言·学习·c#
Yo_Becky2 小时前
【PyTorch】PyTorch预训练模型缓存位置迁移,也可拓展应用于其他文件的迁移
人工智能·pytorch·经验分享·笔记·python·程序人生·其他
DIY机器人工房2 小时前
0.96寸OLED显示屏 江协科技学习笔记(36个知识点)
笔记·科技·stm32·单片机·嵌入式硬件·学习·江协科技
future14124 小时前
每日问题总结
经验分享·笔记
我是小哪吒2.04 小时前
书籍推荐-《对抗机器学习:攻击面、防御机制与人工智能中的学习理论》
人工智能·深度学习·学习·机器学习·ai·语言模型·大模型
✎ ﹏梦醒͜ღ҉繁华落℘5 小时前
WPF学习(四)
学习·wpf
✎ ﹏梦醒͜ღ҉繁华落℘5 小时前
WPF学习(动画)
学习·wpf