Waren Delphi 3 Arrays Fehlertoleranter?

[himitsu]

Wenn alle Arrays einer Ebene gleich groß sind (im dynamischen Array können die ja unterschiedlich sein), dann wäre auch noch sowas möglich:

Delphi-Quellcode:

Var Arr: Array of Array of Irgendwas;

SetLength(Arr, 10, 20);

For i := 0 to Length(Arr) * Length(Arr[0]) - 1 do
  Arr[i div Length(Arr), i mod Length(Arr)] := etwas;