小编joh*_*ohn的帖子

我在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;

但是,当我运行该程序,并单击该按钮,我上一个EStackOverflow错误begin的路线Button1Click.

有人能帮我吗？