delphi有没有类似VBA的array函数 ( 积分: 20 )

VBA的array函数解释是：
返回一个包含数组的 Variant。
语法
Array(arglist)
所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。
说明
用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。
Dim A As Variant
A = Array(10,20,30)
B = A(2)

多谢了！

可以用类型变化的开放数组参数，如：
function SumAll (const Args: array of const): Extended;
这个函数的参数随意，不限数量，不限类型，不知是否符合楼主的要求？
如符号，且欲参考更多有关此类参数的详细使用方法，请参看“pascal精要中文版”第六章
下载地址： http://ufo2003.ys168.com 的“杂类”目录下（请点击文字链接，不要去点那个文件夹图标，这个永硕网盘做的怪怪的）