修饰符Const、Var、Out的作用分别是什么?

guest |浏览462次
收藏|2014/05/22 22:48

请问DELPHI里面修饰符Const、Var、Out的作用分别是什么啊?

满意回答

2014/06/07 20:16

区别还是有的,这个问题一定要搞清楚哦!可以参考下面的说明:

(1)var修饰符

添加var  是地址传递,会修改原有的变量

var

  s: string;

begin

  S := 'Hello';

  ChangeSVar(s);

  ShowMessage(S);

end;

// ChangeSVar 定义

procedure TForm1.ChangeSVar(var A: string);

begin

  A := A + 'World';

end;

以上会输出Hello World,因为是传址,修改的是原来的A

(2)无任何修饰符

var

  s: string;

begin

  S := 'Hello';

  ChangeS(s);

  ShowMessage(S);

end;

// ChangeS定义

procedure TForm1.ChangeS(A: string);

begin

  A := A + 'World';

end;

以上会输出Hello,因为方法ChangeS其实是创建了一个新的A,而输出的还是原来的A,值并没有改变

(3)out修饰符

var

  s: string;

begin

  S := 'Hello';

  ChangeSOut(s);//  此时S的值是'Hello,'而非'Hello,World'!,在过程Hello中的S的原始值被丢弃了

  ShowMessage(S);

end;

// ChangeSOut定义

procedure TForm1.ChangeSOut(out A: string);

begin

  A := A + 'World';

end;

以上会输出World,out仅仅接受返回的值,对out的任何输入都会被忽略。同时out传递给过程的实际参数不必进行初始化,比如对ChangeSOut的调用:

Var

  Tmp: string;

Begin

  ChangeSOut(Tmp);//编译也可以通过

End;

(4)Const修饰符

Const修饰的参数传入之后不允许修改

如果在过程中修改参数会报错,比如:

Procedure xxxx.TestConst(const A: String);

Begin

  A := ’ss’; //企图修改const修改的参数,会报错

End;


oloveuxyz

其他回答(0)
0人关注该问题
待解决问题



+1
 加载中...