怎么得到数组的长度？

[loving]

怎么得到数组的长度？一维和多维
设置setlength(a,10) 有没有相反的函数？

[windindance]

通过High() 和 Low() 可以得到数组的长度。
SetLength(a,0)可以清除数组。

[here]

sizeof(变量名)
that's ok

[copy_paste]

var
A: Variant;
I: Integer;
begin
SetLength(A, 10);

Showmessage('variant A Length is :' + IntToStr(VarArrayHighBound(A, 1)));
end;