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 自带gif控件的动画图片加载和播放

Delphi字符串、数组操作函数

Delphi中怎样展开和关闭treeview的所有节点

Delphi:取得浏览器地址,网址(支持ie,firefox)

Delphi 利用tidencodermime tiddecodermime 组件字符串加密解密

Delphi 以低用户权限启动一个进程.比如vista或者win7中的ie

Delphi tidhttp 登录网页封装

改写个Delphi 版 lz前辈的openprocess

Delphi中使用xmlhttp / xmlhttprequest 避免缓存

Delphi 查找目录下文件(多文件查找)

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...