過程的使用

      在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;