Delphi的位操作以及嵌入式汇编[2]

＊ Delphi嵌入式汇编的使用方式

．在一般函数过程中使用汇编

汇编程序段可以嵌套于其它过程中如

procedure TFormButtonClick(Sender: TObject);

var i:smallint;

begin

i:=;

asm

mov axi

sal ax

mov ＆iax

end;

showmessage(inttostr(i));

end;

这个程序段是把位的变量I进行左移然后把结果用Mov ＆Iax语句放入I变量所在地址返回值最后显示I 的值是

．独立的汇编程序段

汇编程序段也可以单独写成函数或过程这就涉及到参数的传递与结果的返回首先Delphi对于函数的返回有一个约定

即整型数据位的用AL返回位的用AX返回位的用EAX返回

实型用ST（）返回

指针用EAX返回

长字符串用EAX返回其所在地址

变量可用@Result返回

例如一个用汇编的求和函数

function _Sum(X Y: Integer): Integer;

asm

MOV EAXX //把位的数放入EAX

ADD EAXY //进行加法运算

MOV @ResultEAX //返回X＋Y

end;

[] [] []