如何判断我是否处于Delphi异常堆栈中？

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

导读：从finally块中,是否有可能告诉异常已被提出？解决方法您可以检查是否已分配ExceptObject或ExceptAddr. 在VCL来源中,这是为了考试.在GIFImg.pas或jpeg.pas中. 应输出以下代码 ExceptObject零 ExceptObject = nil 如果你删除了例外当然 ExceptObject = nil E

从finally块中,是否有可能告诉异常已被提出？

解决方法

您可以检查是否已分配ExceptObject或ExceptAddr.
在VCL来源中,这是为了考试.在GIFImg.pas或jpeg.pas中.

应输出以下代码

ExceptObject<>零
ExceptObject = nil

如果你删除了例外当然

ExceptObject = nil
ExceptObject = nil

try
    try
      raise Exception.Create('Just an exception');
    finally
      if ExceptObject <> nil then
        WriteLn('ExceptObject <> nil')
      else
        WriteLn('ExceptObject = nil');
    end;
  except

  end;
  if ExceptObject <> nil then
    WriteLn('ExceptObject <> nil')
  else
    WriteLn('ExceptObject = nil');

（编辑：李大同）

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