delphi – 组合多个TBytes阵列的最佳方式

发布时间：2020-12-15 09:05:36 所属栏目：大数据来源：网络整理

导读：结合TBytes阵列的最佳方法是什么？所有阵列都具有相同的大小.我希望将Array2的内容添加到Array1的末尾,将Array3添加到Array2的末尾,依此类推. 解决方法要将两个TBytes合并在一起,您必须分配第三个TBytes,它是两个TBytes的总长度,然后将两者中的字节复制到

结合TBytes阵列的最佳方法是什么？

所有阵列都具有相同的大小.我希望将Array2的内容添加到Array1的末尾,将Array3添加到Array2的末尾,依此类推.

解决方法

要将两个TBytes合并在一起,您必须分配第三个TBytes,它是两个TBytes的总长度,然后将两者中的字节复制到其中.例如：

var
  arr1,arr2,merged: TBytes;
begin
  ...
  SetLength(merged,Length(arr1) + Length(arr2));
  if arr1 <> nil then Move(arr1[0],merged[0],Length(arr1));
  if arr2 <> nil then Move(arr2[0],merged[Length(arr1)],Length(arr2));
end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!