初学Delphi嵌入汇编[4] - 寄存器在过程与函数中的使用

2012-05-04
浏览
导读:CPU 提供了诸多寄存器, 但在 Delphi 的过程和函数中, 只有 EAX ECX EDX 三个寄 存器可以自由使用; 如果改变了其他寄存器, 在过程和函数结束前要给恢复. 记得前

CPU 提供了诸多寄存器, 但在 Delphi 的过程和函数中, 只有 EAX ECX EDX 三个寄 存器可以自由使用;

如果改变了其他寄存器, 在过程和函数结束前要给恢复.

记得前面学习过 Delphi 的过程和函数默认的调用约定是 Register , 前三个参数通 过寄存器传递, 其他参数存与栈.

它所指的三个寄存器就应该是 EAX ECX EDX 了.

看资料介绍应该是: EAX 先接受第一个参数再接受返回值, ECX EDX 接受后面两个参 数.

但我不能进行完整的测试.//测试三个自由寄存器: EAX ECX EDX
procedure Proc(x,y,z: Integer);
var
 a,b: Integer;
begin
 asm
  MOV a,ECX
  MOV b,EDX
 end;
 ShowMessage(Format('%d,%d',[a,b]));
{EAX 我测试不了}
end;
//测试
procedure TForm1.Button1Click(Sender: TObject);
begin
 Proc(11,22,33); {显示: 33,22}
{看来寄存器 ECX 储存的是第三个参数; EDX 储存第二个参数}
end;

Delphi 2007 IDE功能的动画演示[3] - 修改

Delphi 2009中的TLinkLabel实例

再学GDI+[75]: 区域(4) - 根据区域剪切画板

再学GDI+[66]: 路径画刷(6) - SetInterpola

再学GDI+[64]: 路径画刷(4) - 还是 SetCent