我的第一个Delphi程序-测试汇编ADD指令

procedure TForm1.btn1Click(Sender: TObject);
var
  i,j,Count:Integer;
begin
  i:=10;
  j:=20;
  asm
    // MOV EAX,i+j; //不能这样使用
    MOV EAX,i; //赋值
    MOV ECX,j;
    ADD EAX,ECX; {EAX:=EAX+ECX;} //进行加法运算
    MOV Count,EAX;
  end;
  Showmessage(IntToStr(Count)); {30}
end;

end.