Hola Delphi trae toda una coleccion de funciones para manejar eso:
COn
Cita:
function VarArrayDimCount(const A: Variant): Integer;
Description
VarArrayDimCount returns the number of dimensions of the given Variant. The resulting value is zero if the given Variant is not a Variant array.
|
TE devuelve la Dimiencion del Array
y con.
Cita:
function VarArrayHighBound(const A: Variant; Dim: Integer): Integer;
Description
VarArrayHighBound returns the high bound of the given dimension in the given Variant array. The Dim parameter should be 1 for the leftmost dimension, 2 for the second leftmost dimension, and so on. An EVariantError exception is raised if the Variant given by A is not an array, or if the dimension specified by Dim does not exist.
|
La Longitud
luego deberias aplicar un
FOR como de dijo dec
Saludos