Wie kann man Informationen eines Arrays ermitteln?

[Andreas13]

Uwe’s Lösung ist exzellent , kann aber auf den ersten Blick nur von Profis verstanden werden.
Bisher habe ich meine variablen Matrixdimsionen folgendermaßen gelöst:

Delphi-Quellcode:

n_Zeilen := Length(Matrix);  {1. Dimension}
n_Spalten:= Length(Matrix[0]);       {2. Dimension}
n_3D     := Length(Matrix [0][0]);   {3. Dimension}
n_4D     := Length(Matrix [0][0][0]); {4. Dimension}

// Beispiel für 2 Dimensionen:
  For Zeile:= 0 To n_Zeilen - 1 Do
  Begin
    n_Spalten:= Length(Matrix[Zeile]); // Zeilenlängen könnten variieren
    For Spalte:= 0 To n_Spalten - 1 Do
    Begin
     ...   
    End;

Bisher hat es stets funktioniert. Nennen wir das die Amateur-Variante...
Grüße, Andreas