ByRef 参照渡し
Delphi では引数に変数パラメータ(var)を指定します 。
| ■ 変数パラメータ var の例 |
procedure TForm1.Button1Click(Sender: TObject);
procedure IncX(var X : integer);
begin
Inc(X);
end;
var
A : integer;
begin
A := 1;
IncX(A);
ShowMessage(IntToStr(A)); // 結果は 2
end;
|