delphi 函數參數傳遞 默認參數(傳值)、var(傳址)、out(輸出)、const(常數)四類

參數能夠分爲: 默認參數(傳值)、var(傳址)、out(輸出)、const(常數)四類

 

{默認參數是傳值, 不會被改變}

function MyF1(x: Integer): Integer;

begin

  Inc(x);

  Result := x;

end;

 

{var參數是傳址, 會被改變}

function MyF2(var x: Integer): Integer;

begin

  Inc(x);

  Result := x;

end;

 

{out參數是爲支持Com的, 和 var 的結果是同樣的, 通常咱們用不着它}

function MyF3(out x: Integer): Integer;

begin

  Inc(x);

  Result := x;

end;

 

{const參數是絕對不能夠賦值的, 這是被編譯器優化的方式, 儘可能多用}

function MyF4(const x: Integer): Integer;

begin

  //Inc(x); {這句會出錯, 由於帶 const 前綴的參數是不能夠更改的}

  Result := x;

end;

 

 

//調用測試

procedure TForm1.Button1Click(Sender: TObject);

var

  a: Integer;

begin

  a := 6; MyF1(a);

  ShowMessage(IntToStr(a));  //6

  a := 6; MyF2(a);

  ShowMessage(IntToStr(a));  //7

  a := 6; MyF3(a);

  ShowMessage(IntToStr(a));  //7

  a := 6; MyF4(a);

  ShowMessage(IntToStr(a));  //6

end;