初学 Delphi 嵌入汇编[25] - 在汇编中调用函数

最新推荐文章于 2021-03-08 15:38:20 发布

weixin_34112181

最新推荐文章于 2021-03-08 15:38:20 发布

阅读量110

点赞数

CC 4.0 BY-SA版权

原文链接：https://my.oschina.net/hermer/blog/320230

本文探讨了为什么在软件开发领域，大部分程序员未能晋升为架构师的原因，通过深入分析编程技能、思维方式和项目管理等方面，揭示了成为优秀架构师所必备的素质。

为什么80%的码农都做不了架构师？>>>

//准备一个在汇编中要调用的函数
function DelphiFun(x,y: Integer): Integer;
begin
  Result := x + y;
end;


//汇编函数
function AsmFun: Integer;
asm
  mov eax, 1      {eax 对应函数的第一个参数, 这里给第一个参数赋值为 1}
  mov edx, 2      {edx 对应函数的第二个参数, 这里给第二个参数赋值为 2}
  call DelphiFun  {call 是调用命令; 返回值在 eax}
end;


//测试
procedure TForm1.Button1Click(Sender: TObject);
var
  num: Integer;
begin
  num := AsmFun;
  ShowMessage(IntToStr(num)); {3}
end;

转载于:https://my.oschina.net/hermer/blog/320230