1、打开Delphi7集成开发环境，在默认工程的Form1窗体放一个Button1按钮。
2、在Unit1.pas源代码文件的implementation区定义一个接收动态数组参数的过程，代码如下：
procedure sumv(v:array of integer);
var
i:integer;
sum:integer;
begin
sum:=0;
for i:=Low(v) to High(v) do
begin
sum:=sum+v[i];
end;
showMessage(inttostr(sum));
end;
3、双击Button1按钮，进入OnClick事件方法，写如下代码：
procedure TForm1.Button1Click(Sender: TObject);
var
av:array of integer;
i:integer;
begin
SetLength(av,10);
for i:=Low(av) to High(av) do
begin
av[i]:=i;
end;
sumv(av);
end;
4、F9运行程序，点击Button1按钮，弹出对话框，内容为传入数组之和
5、还有另一种调用上面过程的写法，双击Button1按钮进入事件方法，改写代码如下：
procedure TForm1.Button1Click(Sender: TObject);
begin
sumv([1,2,3,4]);
end;
6、F9运行程序，点击Button1按钮，弹出对话框，内容为第二次传入数组之和
