過程無返回值，函式有返回值。

     procedure MyProc(m,n : Integer; o : String; p : Single = 2.5; q : String = 'Delphi');

     如上例所示，過程宣告和定義中，多個引數是用分號隔開的，但在呼叫時是用逗號隔開的 。eg：

     MyProc(3, 4, 'me', 3.14);

     上例中省略了最後一個引數，當指定一個引數的預設值後，其後的所有引數都必須指定一個預設值，如上面的宣告中的引數 p 和 q 。或者說，應該把所有指定預設值的引數放在引數列表的後面。

     Delphi函式的值有兩種方式返回，第一：把值賦給函式名；第二：把值賦給Result。而Result實際上是函式名的一個別名，同時它也是每一個函式內部自動隱含的區域性變數，其型別跟函式的返回型別相同。

     一般情況下，使用Result方式返回函式值，而不用函式名來返回。因為在呼叫一個無引數的函式時只寫函式名就可以呼叫，不像C語言等其它語言一樣即使無引數也要在函式名後加上括號，這樣很容易不小心就寫成遞迴呼叫，進入死迴圈。另外，有時候在coding過程中可能需要修改已經定下的函式名，此時如果用Result返回函式值的話就不需要再修改函式體了。

function Add:Integer;
var
  i:Integer;
begin
  Result := 0;
  for i := 1 to 100 do
    Add := Add + i;    //死迴圈
  ShowMessage(IntToStr(Result););
end;

     需要注意的是，Delphi和其他一些語言不同，它的函式在返回值的時候並不中止函式本身，它總會執行到函式的最後一條語句。如果需要提前退出，可以用 Exit；語句。