开发者社区

文档建议反馈控制台

腾讯云架构师技术同盟

文章/答案/技术大牛

发布

社区首页 >问答首页 >应该如何挂起一个Delphi异常？

问应该如何挂起一个Delphi异常？

提问于 2018-01-29 01:13:13

回答 2关注 0查看 421

如何在Delphi代码中捕获、记录和重新引发异常吗？一个简单的例子：

procedure TForm3.Button1Click(Sender: TObject);
begin
  try
    raise Exception.Create('Bum');
  except
    on E: Exception do
    begin
      MyHandleException(E);
    end;
  end;
end;

procedure TForm3.MyHandleException(AException: Exception);
begin
  ShowMessage(AException.Message);
  LogThis(AException.Message);  
  // raise AException; - this will access violate
end;

相似问题

相关问答用户

请输入您想邀请的人