Delphi中得到二维数组的长度

第一维和第二维分别的长度:

 

var
    A:   array[0..12,   -4..10]   of   Char;
begin
    Caption   :=   Format( '%d,%d ',   [Length(A),   Length(A[Low(A)])]);
end;