如何在Delphi应用程序中调用APPCRASH事件？

发布时间：2020-12-15 09:41:56 所属栏目：大数据来源：网络整理

导读：您可能会将此视为一个愚蠢的问题,但我很好奇如何使用APPCRASH错误终止我的delphi制作的应用程序. (也称为“不发送”错误!!) Thnx提前解决方法您可以通过在System中设置全局变量JITEnable来启用此功能.如果将其设置为1,则所有外部异常(即访问冲突,非法指令

您可能会将此视为一个愚蠢的问题,但我很好奇如何使用APPCRASH错误终止我的delphi制作的应用程序. (也称为“不发送”错误!!)

Thnx提前

解决方法

您可以通过在System中设置全局变量JITEnable来启用此功能.如果将其设置为1,则所有外部异常(即访问冲突,非法指令和任何非Delphi异常)都将触发您想要的反应.如果将其设置为2,则任何异常都将触发该行为.在任何一种情况下,只有在您没有调试应用程序时才会发生这种情况.调试器将始终获得第一次破解,并将通知您即将发生的厄运.这是一个简单的例子：

{$APPTYPE CONSOLE}
uses
  SysUtils;

begin
  try
    JITEnable := 2;
    raise Exception.Create('Error Message');
  except
    on E: Exception do
      Writeln(E.ClassName,': ',E.Message);
  end;
end.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!