Delphi 参数传递

1.数值参数

  变量和结构被完全拷贝到堆栈中,调用函数接受到的只是一个副本.数值参数传递方式是Delphi的默认方式,也是其他大部分语言的默认参数传递方式(比如C++,VC,java...).

形式: function  myFunc(object:TObject):Byte;

          procedure myProc(object:TObject);

PS:堆栈可以这样理解,每次函数或过程调用的时候,在内存中创建的一块内存,用于保存函数或过程中的临时结构等等,函数或过程调用完毕,这块内存将被释放.

2.变量参数

  不像数值参数,这种参数的传递方式,参数不是实参的副本,而是一个引用,在函数或过程中对参数的修改将会反映到参数本身,这种方式就像在C++中的引用参数.

形式: function  myFunc(var object:TObject):Byte;

      procedure myProc(var object:TObject);

3.常量参数

形式: function  myFunc(const str:string):Byte;

      procedure myProc(const number:Integer);

在这里,就是str和number的值在函数或者过程内部不允许修改,经常是为了防止这样的修改而使用const类型,但是需要注意的是,Delphi中,如果这个const参数是对象,则这个对象的属性是可以被修改的,但是在C++,java中,const类型的对象的属性是不允许被修改的.

*****指针的情况就需要注意了,看这个C++函数

void CDepart::showMeberName(const CPeople* pPeople)

{

  CPeople* ptr=new CPeople();

  pPeople=ptr;

  cout<<pPeople->m_name<<endl;

}

在这里,虽然pPeople是个const类型参数,但是,在函数内部仅仅是一个变量,

可以对其进行赋值,const标志这pPeople这块内存的值是只读的(不允许被修改),

不允许修改的是它只向的内存,但是它本身可以被修改,指向另一内存区域,如下:

void CDepart::showMeberName(const CPeople* pPeople)

{

  CPeople* ptr=new CPeople();

  *pPeople=*ptr;   //错误,pPeople指向的值不允许被修改

  cout<<pPeople->m_name<<endl;

}

4.数组参数

type 

  MyArray:Array[0..50] of Byte;

...........

  function  myFunc(TempArray:MyArray):Byte;

..........

实际上常用下面这种形式,数组的上界不确定

  function  myFunc(TempArray:Array of Byte):Byte;

  var

    i:Integer;

  begin

    i:=High(TempArray);//High返回TempArray的上界

  end;