如何传递数组给过程或者函数
问：我用procedure Proc(var A:array[1..10] of integer);怎么都不能编译通过，难道Delphi不能传递数组作为参数吗？
答：必须先用Type定义一下即可：
type
TProcArray=array[1..10] of integer;
procedure Proc(var A:TProcArray);
这样就没有问题了，而且对于动态数组也可以用上面的方法！使用动态数组的时候，有一个问题是如何遍历每一个数据项？采用类似的代码即可：
procedure Proc(var A:TProcArray);
var
i:integer;
begin
....
for i:=Low(A) to High(A) do
/// A[i]
就是每一个数据项
....
end;