DELPHI参数几个概念上的区别 收藏

DELPHI参数几个概念上的区别 收藏
 引用参数：

引用参数用var关键字标示

procedure DoubleTheValue (var Value: Integer);
begin
  Value := Value * 2;
end;在这种情况下，参数既把一个值传递给过程，又把新值返回给调用过程的代码。当你执行完以下代码时：

var
  X: Integer;
begin
  X := 10;
  DoubleTheValue (X);x变量的值变成了20，因为过程通过引用访问了X的原始存储单元，由此改变了X的初始值 在C++中， 引用用&表示

值得注意的是：

Delphi 3增加了一种新的参数：out。out参数没有初始值，只是用来返回一个值。out参数应只用于COM过程和函数，一般情况下最好使用更有效的var参数。除了没有初始值这一点之外，out参数与var参数相同。

常量参数

和C++一样，用CONST关键字表示

function DoubleTheValue (const Value: Integer): Integer

编译器会选用一种与引用参数相似的方法编译常参（C++术语中的常量引用），但是从表面上看常参又与值参相似，因为常参初始值不受例程的影响。

开放数组参数

与C语言不同，Pascal 函数及过程的参数个数是预定的。如果参数个数预先没有确定，则需要通过开放数组来实现参数传递。

一个开放数组参数就是一个固定类型开放数组的元素。 也就是说，参数类型已定义，但是数组中的元素个数是未知数。

function Sum (const A: array of Integer): Integer;类型变化的开放数组参数

除了类型固定的开放数组外，Delphi 还允许定义类型变化的甚至无类型的开放数组。这种特殊类型的数组元素可随意变化，能很方便地用作传递参数。

技术上，array of const 类型的数组就能实现把不同类型、不同个数元素组成的数组一下子传递给例程

function Format (const Format: string; const Args: array of const): string;N := 20;
S := 'Total:';
Label1.Caption := Format ('Total: %d', [N]);
Label2.Caption := Format ('Int: %d, Float: %f', [N, 12.4]);
Label3.Caption := Format ('%s %d', [S, N * 2]);

但我们往往会遇到这样的问题：

在FUN（）中传入 var a: array of integer 参数之后
不能在函数里SetLength（a，num）;

所以我们把参数设为动态数组类型

type

tarrayofinteger = array of integer;

procedure grow( var data: tarrayofinteger );

begin

setlength( data, length(data) ,   新长度 );

// 动态数组作为参数可以改变数组大小。

end;

参考BLOG：

http://hi.baidu.com/broland/blog/item/0ab119f516b4ade57609d75c.html

参考文献：

<PASCAL精要>

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/jqandjq/archive/2010/03/02/5339123.aspx