如何连接2个数组?

How to concatenate 2 arrays?

他们是否有连接 2 个数组的助手?我的意思是帮助程序将 array1 的所有元素添加到 array2 的末尾?

  array1: array of integer;
  array2: array of integer;

如果你有一个相当新的 Delphi(根据评论 XE7),你可以这样做:

PROCEDURE Test;
  TYPE
    TIntArr     = TArray<INTEGER>;

  VAR
    A1,A2       : TIntArr;

  BEGIN
    SetLength(A1,20);
    SetLength(A2,30);
    A1:=A1+A2
  END;

即。简单加法。