delphi AppendBytes

在 Delphi 中，如果你想往一个字节数组中添加元素，可以使用 `TBytes` 类型的 `SetLength` 函数来实现。具体的方法是：

1. 声明一个 `TBytes` 类型的变量，例如：

var
  myBytes: TBytes;

2. 使用 `SetLength` 函数为 `myBytes` 分配初始大小：

SetLength(myBytes, 10); // 分配一个初始大小为 10 的字节数组

3. 使用 `Copy` 函数将新的字节数组添加到原有字节数组的末尾：

var
  newBytes: TBytes;
begin
  // 假设 newBytes 为新的字节数组
  SetLength(myBytes, Length(myBytes) + Length(newBytes));
  Copy(newBytes[0], myBytes[Length(myBytes) - Length(newBytes)], Length(newBytes));
end;

这样，就可以将新的字节数组添加到 `myBytes` 的末尾了。