从静态数组中删除元素

Question

我正在尝试从数组中删除一个项目。 数组不是动态的！

我找到了很多关于如何为动态变体执行此操作的示例，但没有找到用于静态变体的示例。

delphi 示例：

var
  A: array of integer;
begin
  ...
  A:=[1,2,3,4];
  Delete(A,1,2); //A will become [1,4]
  ...
end;

来自其他网站的示例：

type
  TIntArray = array of Integer;
procedure DeleteArrayElement(var AArray: TIntArray; const AIndex: Integer);
begin
  Move(AArray[AIndex + 1], AArray[AIndex], SizeOf(AArray[0]) * (Length(AArray) - AIndex - 1)); 
  SetLength(AArray, Length(AArray) - 1);
end;
...
//call via
DeleteArrayElement(IntArray, 3);
...

我的数组被定义为 0 .. 11 所以这不是动态的（我猜）？

当我尝试使用 SetLength 函数时，它显示类型不兼容。

知道如何解决这个问题吗？

Answer 1

当您声明一个静态数组时，您告诉编译器应该分配并保留整个数组的内存，直到程序终止（如果分配在全局空间中）。

您无法更改静态数组的大小。这就是为什么在 Delphi 中存在动态数组的目的。

静态数组的 Embarcadero 文档说：

如果你创建了一个静态数组，但没有给它的所有数组赋值 元素，未使用的元素仍被分配并包含随机 数据;它们就像未初始化的变量。