相关疑难解决方法(0)

如何在Delphi中合并2个字符串数组

我有2个或更多的动态字符串数组,填充了一些巨大的数据,我想将这个2数组合并到一个数组,我知道我可以用这样的for循环:

var
  Arr1, Arr2, MergedArr: Array of string;
  I: Integer;
begin
  // Arr1:= 5000000 records
  // Arr2:= 5000000 records

  // Fill MergedArr by Arr1
  MergedArr:= Arr1;

  // Set length of MergedArr to length of ( Arra1 + Arr2 )+ 2
  SetLength(MergedArr, High(Arr1)+ High(Arr2)+2);

  // Add Arr2 to MergedArr
  for I := Low(Arr2)+1 to High(Arr2)+1 do
    MergedArr[High(Arr1)+ i]:= Arr2[i-1];
end;
Run Code Online (Sandbox Code Playgroud)

但是对于庞大的数据来说速度很慢,复制阵列内存数据有更快的方式吗?

arrays delphi

9
推荐指数
2
解决办法
3944
查看次数

标签 统计

arrays ×1

delphi ×1