我如何看到我的delphi应用程序目前使用了多少堆栈空间？

我如何看到我的delphi应用程序目前使用了多少堆栈空间？我有一个非常奇怪的错误,听起来像堆栈麻烦.我想将它添加到我的应用程序的日志中,以了解有多少堆栈空间在使用/剩余.使用调试器可能不是很大,因为例程可以被调用多次.

谢谢！

解决方法

这应该给你你当前的堆栈使用：

function CurrentStackUsage: DWord;
asm
  mov eax,fs:[4]
  sub eax,esp
end;

我不记得在我的头顶,一个简单的方法来获取运行时的最大堆栈大小,但你的链接器选项中有默认值.