Delphi 7中的GetStackTrace？

Question

使用Delphi 7,如何从一个字符串中获取表示堆栈跟踪的字符串Exception？

try
  SomethingDodgy();
except
  on E:Exception do begin
    // print stack trace
    Log.Write(/* ??? */);
  end;
end;

我听说最新的delphi中有一个GetStackTrace函数,但我找不到delphi 7的任何东西.不,升级不是一个选项:)

Answer 1

您可以尝试使用madExcept,一个很棒的异常处理框架.

madshi里面有大量的示例代码; 我确定我之前使用过堆栈跟踪的东西.

正如Dmitriy所说,JCL还有堆栈跟踪代码; 一个旧样本在这里.

Answer 2

我把EurekaLog扔进游戏中.这是一个很棒的工具,而且价格也不贵.

Answer 3

Win32 中的堆栈跟踪不如.NET 或Java 的好（最新版本的Delphi 使用.NET 堆栈跟踪）。无论如何，我在这里
找到了一个提供更多信息的链接（它位于 ExeEx，因此要查看该解决方案，请单击搜索中的第一个链接）。

请参阅页面底部。