Wie kann man Informationen eines Arrays ermitteln?

[Uwe Raabe]

Mein Code benötigt sowohl die Variable als auch den Typ. Eigentlich sollte damit schon gesamte Array-Struktur bekannt sein und der Zugriff auf TypeInfo wäre überflüssig.

Delphi-Quellcode:

type
  ArrayOfArrayOfDouble = array of array of double;
var
  cnt: Integer;
  I: Integer;
  Input: ArrayOfArrayOfDouble;
  size: Cardinal;
begin
  cnt := 0;
  for I := 0 to Length(Input) - 1 do
    Inc(cnt, Length(Input[I]));
  size := cnt * SizeOf(Double);
end;

Mit den Delphi Generics gäbe das schon mehr Sinn, aber dann wird's vermutlich nichts mit älteren Delphis und FPC. (Dann hätte ich meinen Code auch etwas anders formuliert)