过程、函数的定义与调用

一、过程的声明、定义与调用

1、过程的声明

过程应遵循先声明后使用的原则，他就是一个独立代码块，没有返回值，被调用时delphi就当他是一个独立语句，过程的声明语法如下：

procedure   过程名 （var 参数：类型）

<局部声明变量>

begin

代码段

 

end;

 如果过程有多个参数时中间用分号隔开（；），过程的参数称为形式参数，简称形参。如果没有参数，则称无参过程，例如声明一个有参数和无参过程：

procedure  mypro(var str:string;int:integer);      //有参数过程

procedure mypro1();       //无参数过程

 

2、过程定义

过程定义就是在过程中编写要实现的代码，在程序中声明了过程以后，可以按ctrl+shift+c，程序会自动给出过程的定义部分。例如：

procedure  tfrom1.myproce（str1，str2，str3：string）；

begin

edit1.text:=str1;

edit2.text:=str2;

edit3.text:=str3;

end;

上述过程作用是文本框赋值。

 

3、过程的调用

过程的调用语法是：

过程名（参数）；

调用过程时，过程的参数个数、次序、类型必须要一一对应，要不然就会出错。

调用上面的赋值过程

procedure tform1.button(sender:object)

begin

myproce('参数1','参数2','参数3');

 end;

 

二、函数的声明、定义与调用

1、函数的声明

函数也必须遵循先声明后调用原则，函数的声明语法如下：

function 函数名(var 参数:数据类型):参数返回类型 ；

<局部变量声明>

begin

 

<函数体语句>

 

end;

声明一求最大值函数如下：

function maxvalue(x,y:integer):integer

 

 2、函数的定义

与过程不同的是，函数不以实现某种操作为目的，而只是为了获得一个计算的值，该值最终是通过函数名称返回给调用者，因此函数具有值类型。定义一个求和函数

function tform1.myfunction(x,y:integer):integer

begin

ruesult:=(x+y)

end;

result是函数名的一个别名，与函数结果有相同的数据类型，是delphi语言与定义的一个变量，当result出现在赋值左侧时，编译器通过定义为函数赋返回值

 

3、函数的调用

函数的调用格式如下：

函数名（参数）；

 

未完待续