länge eines 2-Dimensionalen und Dynamischen Array

[Teekeks]

Das hier geht leider auch nicht:

Delphi-Quellcode:

procedure TGame.InsertMap(aMap: TMap);
var x,y:integer;
begin
  _Act_X:=0;
  _Act_Y:=0;
  _Map_X:=High(aMap);
  _Map_Y:=High(amap[0]);
  _Map:=Copy(aMap);// hier bleibt er stecken...
end;

Fehlermeldung:
"Project raised exception class 'RunError(204)'."
Wisst ihr was ich jetzt falschmache?