Delphi函数参数传递 默认参数（传值）、var（穿址）、out（输出）、const（常数）四类...

Delphi的参数可以分为：默认参数（传值）、var（传址）、out（输出）、const（常数）四类

 

　　可以对比C/C++的相关知识，类比学习。

 

　　1.默认参数是传值，不会被改变，例子

function MyFun(x : Integer) : Integer;
begin
    Inc(x);
    Result := x;
end;

　　2.var参数是传址，会被改变，例子

function MyFunVar(var x : Integer) : Integer;
begin
    Inc(x);
    Result := x;
end;

　　3.out参数是为支持Com的，和var的结果是一样的，一般我们用不着

function MyFunOut(out x : Integer) : Integer;
begin
    Inc(x);
    Result := x;
end;

　　4.const参数绝对不可以赋值的，这是被编译器优化的方式，尽量多用

function MyFunConst(const x : Integer) : Integer;
begin
    Inc(x);    //这句会报错，因为带const前缀的参数是不可以被修改的
    Result := x;
end;

　　

 

　　下面做调用这些函数的测试

procedure TForm1.Button1Click(Sender : TObject);
var
   a : Integer;
begin
    a := 5;
    MyFun(a);
    ShowMessage(IntToStr(a));    //6
    
    a := 6;
    MyFunVar(a);
    ShowMessage(IntToStr(a));    //7

    a := 6;
    MyFunOut(a);
    ShowMessage(IntToStr(a));    //7

    a := 6;
    MyFunConst(a);
    ShowMessage(IntToStr(a));    //6，因为在MyFunConst里面是不能对const参数进行修改的

end;

　　

转载于:https://www.cnblogs.com/xumenger/p/4390556.html