在 delphi 7.0 中创建打包结构时出现错误 EStackOverflow

发布于 2024-10-28 19:11:42 字数 600 浏览 0 评论 0原文

在 Borland Delphi 7.0 中创建打包结构时出现 EStackOverflow

我想要执行以下操作:

Type

 T4 = packed record
     VT  : integer;
     SKT : byte;
  end;

  T3 = packed record
     O : boolean;     
     TT4 : array of T4;  
  end;

  T2 = packed record
     con  : boolean;
     TT3 : array [64..90,64..90] of T3;
  End;

  TTT = array [64..90,64..90] of T2;


procedure TForm1.Button1Click(Sender: TObject);
var  
   Arr  : TTT;
begin 
        Arr[64,64].con:=false;
end;

但是当我运行程序并单击按钮时,我在 begin 行上收到 EStackOverflow 错误Button1Click

有人可以帮助我吗?

I'm getting an EStackOverflow when creating a packed struct in Borland Delphi 7.0

I want to do the following:

Type

 T4 = packed record
     VT  : integer;
     SKT : byte;
  end;

  T3 = packed record
     O : boolean;     
     TT4 : array of T4;  
  end;

  T2 = packed record
     con  : boolean;
     TT3 : array [64..90,64..90] of T3;
  End;

  TTT = array [64..90,64..90] of T2;


procedure TForm1.Button1Click(Sender: TObject);
var  
   Arr  : TTT;
begin 
        Arr[64,64].con:=false;
end;

But when I run the program and click the button, I get an EStackOverflow error on the begin line of Button1Click.

Can someone help me?

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(2

寄居者 2024-11-04 19:11:42

很简单,创建的项目对于默认堆栈大小来说太大了。要么在创建线程时增加该值,要么在堆上分配内存。无论哪种方式都有效。

只需计算一下即可:

sizeof(T4) = 5
sizeof(T3) = 5
sizeof(T2) = 3646 // if I'm right
sizeof(TTT)= 2657934

Simple, the created items are too big for the default stack size. Either increase that when creating the thread or allocate the memory on the heap. Either way works.

Just do the math on it:

sizeof(T4) = 5
sizeof(T3) = 5
sizeof(T2) = 3646 // if I'm right
sizeof(TTT)= 2657934
很糊涂小朋友 2024-11-04 19:11:42

您可以通过增加项目选项中的堆栈大小来部分解决此问题。

但你不应该:

不要在堆栈上创建那些巨大的结构。这就是堆的用途,而不是堆栈的用途。

You can partially solve this by increasing your stack size in your project options.

But you shouldn't:

Don't create those huge structures on the stack. That's what the heap is for, not the stack.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文