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