delphi - 如何对动态数组进行切片？

Question

如何将动态数组分割为多个子数组？ Delphi 中的 Slice() 函数不支持动态数组。那么如何才能做到呢？欢迎提供通用解决方案。

program Project10;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils;

var
  A: Array of Integer;
begin
  SetLength(A, 4);
  Slice(A, 2); // [dcc32 Error] Project10.dpr(15): E2193 Slice standard function only allowed as open array argument
end.

Answer 1

使用Copy(A, 0, 2)而不是Slice(A, 2)。

关键是，要么您需要一个“开放数组参数”(在这种情况下您需要 Slice)，要么您需要一个常规数组，在这种情况下 Copy 将提供一个好的解决方案。