Inkompatible Typen: 'Array' und 'dynamic array'

[soulflare]

Hallo!

Ich habe ein Problem in folgender Prozedur:

Delphi-Quellcode:

procedure shuffle(quelle: array of string; var ziel: array of string);
var temp: array of string;
    i: integer;
    zufall: integer;
begin
  SetLength(temp, length(quelle));
  SetLength(ziel, length(quelle));

  for i := 0 to high(quelle) do
  begin
    zufall := RandomRange(0, high(quelle) - i);
    temp[i] := quelle[zufall];
    quelle[zufall] := quelle[high(quelle) - i];
  end;
  ziel := Copy(temp);
end;

Und zwar bekomme ich folgende Fehler:

[Fehler] uMain.pas(294): Inkompatible Typen
[Fehler] uMain.pas(301): Inkompatible Typen: 'Array' und 'dynamic array'

Die Prozedur soll das array quelle in zufälliger Reihenfolge in ziel speichern.
kann mir einer sagen wo der Fehler liegt?

EDIT: Zeile 294 ist "SetLength(ziel, length(quelle));" und
Zeile 301 ist "ziel := Copy(temp);"

Ich habe auch 2 dynamische Arrays an die Prozedur übergeben.