当前位置: > 编程语言 > Delphi教程 >

初学Delphi嵌入汇编[12] - 在汇编代码中可以直接使用Result

时间:2012-05-04 | 栏目:Delphi教程 | 点击:

//在汇编代码中使用 Result

function Fun(x: Integer): Integer;
asm
 mov ecx, &x
 dec ecx      {汇编中的 dec 是减 1 指令, 和 Delphi 是一样的}
 mov @Result, ecx {在本例中去掉 @ 也可以, 暂时不知怎么回事}
end;

//测试

procedure TForm1.Button1Click(Sender: TObject);
var
 i: Integer;
begin
 i := 100;
 i := Fun(i);
 ShowMessage(IntToStr(i)); {99}
end;

您可能感兴趣的文章:

相关文章