delphi使用可变参数函数的方法 (2012-10-08 12:47:01)

貌似没有这样的指令。不过，delphi可以用[a,b,c……]的形式表示数组，所以就有一个办法了，比如：

procedure   a1(b:   array   of   integer);
var
    i:integer;
begin
    showmessage( 'procedure   begin ');
    for   i:=low(b)   to   high(b)   do
        showmessage(inttostr(b[i]));
end;

procedure   TForm1.Button1Click(Sender:   TObject);
begin
    a1([3,4,5]);
    a1([]);
end;

直接在传参数时传数组，因为用了[]分隔，还可以传递几组可变参数！比C神马的更实用！C和VB应该是只能用一组可变参数的，而且必须放在最后。