Array in Array kopieren

[himitsu]

Delphi-Quellcode:

var
  x, y: Integer;
  A, B: array of array of Integer;

// einfach 

for x := 0 to High(A) do
  for y := 0 to High(A[x]) do
    B[x + xOffset, y + yOffset] := A[x, y];

// oder (Zusammenhängendes kann man zusammen kopieren)

for x := 0 to High(A) do
  Move(B[x + xOffset, yOffset], A[x, 0], SizeOf(Integer) * Length(A[x]));