delphi - レコード配列のコピーオンライト

Question

コピー オン ライト セマンティクスはレコードの動的配列に適用されますか?

レコードの配列を適切に複製するには?

これで十分ですか?:

type
  recordA = Record
    Y:integer;
  end;
var x: array of recordA;
    b: array of recordA;
    item: recordA;
begin
  SetLength(x, 2);
  item.Y:= 2;
  x[0] := item;
  item.Y:= 5;
  x[1] := item;
  //Copying
  b:= x;

コピーが完了したら、最初の配列をリセットする必要があります。

SetLength(x, 0);

こうすればいいの？