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;

  

上一篇:创建Material Design风格Android应用--自定义阴影和裁剪视图


下一篇:Jquer Ajax xmlhttp请求成功了,为什么一直在error函数里面