delphi 捕捉全局异常错误的方法

本文整理自网络，侵删。

 
private
    { Private declarations }
  public
  procedure GlobalExceptionHandler(Sender: TObject; E: Exception);
    { Public declarations }
  end;proced


ure TForm1.FormCreate(Sender: TObject);
begin
Application.OnException := GlobalExceptionHandler;
end;
 
 
procedure TForm1.GlobalExceptionHandler(Sender: TObject; E: Exception);
begin
mmLog.Lines.Add(Sender.ClassName + ': ' + E.Message);
end;
 

相关阅读 >>

Delphi html转义字符编码转换

Delphi把域名转换成ip

Delphi 2009 之 tcategorypanelgroup[4]: height

Delphi fdquery获取字段类型

Delphi指针长度

Delphi cxgrid中回车键光标移到下列

Delphi调用sql分页存储过程实例

Delphi 让label 始终在form的正中显示

Delphi ios取设备唯一值

Delphi unigui确认对话框

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 捕捉全局异常错误的方法