Delphi第5章过程和函数剖析.pptVIP

第五章 过程与函数 Delphi中，有许多预先定义好的子程序，它们统称为运行库。Object Pascal也允许程序员自己定义子程序。子程序的引入，降低了程序的复杂性。编写子程序还可以提高代码的重用率。子程序实现的功能相对独立。如此，将大大提高程序编写和维护的效率。 Object Pascal的子程序分为两种：过程（procedure）和函数（function）。 过程和函数的区别主要在于过程本身没有返回值，而函数有一个返回值。另外，在定义过程时使用保留字procedure，而定义函数使用保留字function。 一、过程和函数的声明 1. 过程声明 procedure 过程名(参数表); 局部声明部分 begin 过程体语句序列 end; 过程名即过程标识符。局部声明部分用于声明仅限于该过程内引用的常量、自定义数据类型、变量、过程和函数等。参数表内声明参数的个数和类型，同类型参数之间以逗号分隔，不同类型参数之间以分号分隔。 2. 函数声明 function 函数名(参数表):返回数据类型; 局部声明部分 begin 函数体语句序列 end; 函数首部除了声明函数的标识符、形式参数表以外，必需在冒号之后声明函数返回数据类型。局部声明部分与过程的局部声明部分类似。 函数名本身作为一个特殊的变量，与系统预先定义的变量Result一样，可在函数体中接受赋值，用来存储函数返回值。 过程和函数首部中声明的参数称为形式参数，简称形参。形式参数，以及过程和函数局部声明的各种标识符（如常量、数据类型、变量、过程、函数等）均为局部的，即它们的作用范围只在该过程或函数中，在局部范围内有效。全局标识符是在主程序中定义的，其作用范围在主程序和子程序。由于任一被调用的子程序中可以随意地访问全局变量，全局变量的数据缺乏可靠和安全，因此，应尽量避免在子程序中直接访问全局变量，而是通过参数来传递外部数据，进行间接访问。 二、过程和函数调用 如同标准过程和函数的调用一样，程序中可以调用自定义的过程和函数。过程调用的形式是以其作为一条单独的语句。 函数也可以单独作为一条语句来调用，而更一般的是把函数作为表达式，或表达式的一部分的形式进行调用的， 函数作为一条单独的语句是合法的，但多数情况下，调用函数主要是为了获得其返回值，因此函数作为一条单独语句调用通常实际意义不大。 三、参数传递 过程或函数调用时，调用语句中传递给过程或函数的参数称为实际参数，简称实参。实参的个数、数据类型和顺序必须与形式参数一一对应，多个参数之间用逗号隔开。 形式参数出现在过程和函数声明的首部，形式参数分为三类：值参数（简称值参）、变量参数（简称变参）和常量参数。三者在声明时的修饰和实参的区别分述如下： ⑴ 值参数声明时，形参的前面无任何修饰，值参传递的是一个值。调用时，实参的值拷贝给形参，形参值的改变不影响其对应实参的值。 ⑵ 变量参数声明时，形参的前面用保留字var修饰。变参传递的是一个变量的地址，即实参把地址传递给变参，这样变参和实参指向的是同一地址空间，因此，在过程和函数中对变参的修改，直接影响实参。显然可以利用变参为被调子程序（函数或过程）“传递”数据给主调程序。 ⑶ 常量参数声明时，形参的前面用保留字const修饰。常量参数的传递形式本质上类似于值参，但在子程序中，它相当于局部的类型常量，不能对常量参数进行赋值。常量参数的使用可以防止子程序对实参的修改。 在函数或过程定义中，可以给值参数设置一个默认值。在调用子程序（过程或函数）时，如果没有提供相应的实参，那么子程序即以默认值作为初值。注意：参数的默认值只能从参数表的右边开始默认，且中间不能跳跃，此外，变参不能设置默认值。 例如： procedure FillArray(a:array of Integer; value:Integer=0); 值参value是默认参数，缺省值为0，可以有如下两种调用方式： FillArray(MyArray); // 参数value使用缺省值0 FillArray(MyArray,10); // 参数value指值10 四、过程和函数重载 过程和函数重载是指定义多个名称相同，而参数列表不同的过程和函数。编译器依据调用时实参表中参数个数和类型，自动匹配一个重载的过程或函数。重载过程和函数首部句尾应使用保留字overload修饰。 例如： function add(a,b:integer):integer; overload; begin result := a + b; end; function add(a,b:real):real; overload; begin result := a + b; end; fun