初學Delphi嵌入匯編[13] - 地址參數用 [] 取值

//關於地址參數(var/out)

function Fun(var x,y: Integer): Integer;
asm
　mov eax, x　　　　 {現在 eax 中只是 x 的地址}
　mov eax, [eax]　　 { [eax] 是取值, 是不是類似於 P^ ? }
　mov edx, y
　add eax, [edx]
//mov @Result, eax {在這裡, 這句可有可無}
end;

//測試

procedure TForm1.Button1Click(Sender: TObject);
var
　a,b: Integer;
begin
　a := 1;
　b := 8;
　a := Fun(a,b);
　ShowMessage(IntToStr(a)); {9}
end;