delphi 二维数组的大小和元素个数问题

Posted h2zzhou

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi 二维数组的大小和元素个数问题相关的知识,希望对你有一定的参考价值。

type

TComplex = record
Real : Single;
Imag : Single;

end;

TKArray=array [1..2048,1..2048] of TComplex;

var
lcArr:TKArray;
lcC:Integer;

lcArr2:Array of Array of TComplex;
begin
Memo1.Lines.Clear;
Memo1.Lines.Add(‘TKArray [2048 x 2048]:‘);
lcC:=SizeOf(lcArr);
Memo1.Lines.Add(‘总大小:‘+IntToStr(lcC)); 33554432
lcC:=SizeOf(TComplex);
Memo1.Lines.Add(‘元素大小:‘+IntToStr(lcC)); 8
lcC:=SizeOf(lcArr) div SizeOf(TComplex);
Memo1.Lines.Add(‘元素个数:‘+IntToStr(lcC)); 4194304
Memo1.Lines.Add(‘--------------------------------------‘);
Memo1.Lines.Add(‘第一维元素个数:‘+IntToStr(Length(lcArr))); 2048
Memo1.Lines.Add(‘第二维元素个数:‘+IntToStr(Length(lcArr[1]))); 2048
Memo1.Lines.Add(‘--------------------------------------‘);

Memo1.Lines.Add(‘动态数组‘);
SetLength(lcArr2,1024,1024);
Memo1.Lines.Add(‘第一维元素个数:‘+IntToStr(Length(lcArr2))); 1024
Memo1.Lines.Add(‘第二维元素个数:‘+IntToStr(Length(lcArr2[0]))); 1024

以上是关于delphi 二维数组的大小和元素个数问题的主要内容,如果未能解决你的问题,请参考以下文章

一维数组 二维数组 字符数组 处理字符串的函数

C程中如何计算数组(一维及二维)占内存空间的大小

二维数组元素个数的算法

LEETCODE刷题 二维数组查找

delphi如何定义一个二维的数组?比如数组1里面有a b c d.....同时a包含N个数组

二维数组a[11][11]数组元素个数