Delphi7中的函数与过程（Function and Procedure）