代码之家 › 专栏 › 技术社区 › user1937012

Delphi程序数组参数混淆

procedure delphi arrays

user1937012 · 技术社区 · 7 年前

我有一个我不明白的问题:

procedure TMain.THREAD_SYNC(
              AProgressBar: TProgressBar; 
              ARemoteData: array of RemoteDATA; 
              ALocalData : array of LocalDATA; 
              Number : integer; 
              AInfo : TEdit);

THREAD_SYNC(Remote,Local,0,Edit1)

const 所以我把程序改成:

procedure TMain.THREAD_SYNC(
              AProgressBar: TProgressBar; 
              ARemoteData: array of RemoteDATA; 
              const ALocalData : array of LocalDATA; 
              Number : integer; 
              AInfo : TEdit);

现在它成功了,我的问题是我不明白为什么?
没有这些有什么区别 ?

1 回复 | 直到 7 年前

Johan 7 年前

这些数组是按值传递的,这意味着它们被复制到堆栈上并以这种方式传递。因此堆栈溢出错误。

通过设置阵列参数解决了这个问题 const . 在这种情况下,数组是通过引用而不是值传递的。换句话说,只传递一个指针。

一般来说,在传递(可能的)大型结构(如数组或记录)时,应该始终通过引用传递它们;使用 常数 var 如果接收器有。这有一个额外的好处,那就是您的代码变得更快,因为不需要复制任何数据。

procedure TMain.THREAD_SYNC(
              AProgressBar: TProgressBar; 
              const ARemoteData: array of RemoteDATA; 
              const ALocalData : array of LocalDATA; 
              Number : integer; 
              AInfo : TEdit);

没有必要使用const TProgressBar TEdit ,这些是类,类存储在堆上,堆栈上只有一个引用。

推荐文章

Megrez7 · C#ToArray转换合并为一行,导致数组元素更改

1 年前

bairog · 从按属性筛选的对象数组字典中创建值数组

1 年前

Anka HanÄ±m · 关于结构和动态数组地址的问题

1 年前

Swapnil Supekar · 将二维阵列转换为一维阵列,并将一维阵列粘贴到另一张图纸上

1 年前

Lorenzo Bertolaccini · 在Angular项目中通过对话框后,在控制台中显示但在HTML中不显示的数据数组

1 年前

MaSc. H. · 大小与阵列大小

1 年前

Geremia · 2D NumPy数组+1D数组?

1 年前

MARTIN · 交换第一个和最后一个单词,反转所有中间的字符

1 年前

Paul Williams · 迭代数组时输出有问题

1 年前

Oliver Morgan · PostgreSQL错误:无法累积不同维度的数组

1 年前