从finally块中,是否有可能告诉异常已被提出？
解决方法
您可以检查是否已分配ExceptObject或ExceptAddr.
在VCL来源中,这是为了考试.在GIFImg.pas或jpeg.pas中.
在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');