delphi - 有没有办法在没有循环的情况下在delphi中的TIdBytes变量的开头添加一个字节？

Question

我有一个 TIdBytes 变量 myBytesArray，我想在它的开头添加一个字节。我尝试了一个循环(虽然我肯定更喜欢非循环解决方案)，但它仍然没有用:

myBytesArray : TIdBytes;
// ...
len := Length(myBytesArray);
SetLength(myBytesArray, len + 1);
for i := len downto 1 do begin
  myBytesArray[i] := myBytesArray[i-1];
end;
myBytesArray[0] := myNewByte;

Answer 1

TIdBytes 是一种 Indy 数据类型。 Indy在IdGlobal单元中有很多操作TIdBytes的函数，比如InsertByte():

InsertByte(myBytesArray, myNewByte, 0);