delphi如何執行Debug命令

Question

delphi如何執行Debug命令如：
a 
mov ax,301 
mov bx,90 
mov cx,1 
mov dx,80 
int 13 
int 20 
g 
q 

Answer 1

可嵌入asm代码時報錯
asm
 a 
mov ax,301 
mov bx,90 
mov cx,1 
mov dx,80 
int 13 
int 20 
g 
q 
end

Answer 2

是编译不能执行，还是执行的时候报错啊！
给你个例子，参考参考，希望有帮助。
function toulong(x: pchar): longword;
asm
  mov esi,eax
  mov ax,[esi]
  xchg ah,al
  shl eax,16
  mov ax,[esi+2]
  xchg ah,al
end;

Answer 3

那些debug里的命令，是不能在pas的asm区域里写的如果你非要那样，可以在程序里用shell执行debug命令，把你那些asm代码以文件的形式作为参数传递给debug