过程的使用

 

      在Delphi语言中，过程(procedure)和函数(function)被统称为例程，是用来实现特定功能的语句块，当该过程或函数被程序所调用时，它就会执行某种特定的功能。

      过程和函数类似，他们的区别主要在于：函数必须要有返回值；过程没有返回值。

       1、过程的声明

      过程遵循先声明后使用的原则，它是一个独立的语句块，没有返回值，被调用时Delphi会将该过程作为一个独立的语句执行：

procedure 过程名（var 参数：类型）；
<局部变量名>
begin
   <过程体语句>
end；

使用保留字声明过程，过程名可以是任何有效的标识符，当调用该过程的时候，只要调用过程名就可以了。若过程中有多个参数，则用分号隔开。过程声明参数为形参，如无参数，则成为无参过程。例如：

procedure Myproce(var str:String;int:Integer);    //有参数
procedure Myproce();                              //无参数

      2、过程的定义

      过程的定义是在该过程中编写所要实现某些功能的代码。当在程序中声明了过程后，可以按下<Ctrl+Shift+C>键，程序将会自从的声明该过程的定义部分，例如定义一个过程，代码如下：

procedure TForm1.Myproce(str1,str2,str3:String);
begin
   Edit1.Text:=str1;
   Edit2.Text:=str2;
   Edit3.Text:=str3;
end;

此过程实现了给文本框组件赋值的功能。

      3、过程的调用

      在调用过程的时候过程中的参数的个数、次序以及类型必须要与该过程中的参数一一对应，否则将会出现错误，如调用上述自定义过程，代码如下：

procedure TForm1.Button1Click(Sender: TObject);
begin
   Myproce('姓名','年龄',‘youxing’);
end;