var
a: Integer;
const
n = $10;
begin
asm
mov ecx, 10 {使用十进制常数}
mov a, ecx
end;
ShowMessage(IntToStr(a)); {10}
asm
mov ecx, $10 {使用十六进制常数}
mov a, ecx
end;
ShowMessage(IntToStr(a)); {16}
asm
mov ecx, 10H {可以加 H 或 h 表示十六进制}
mov a, ecx
end;
ShowMessage(IntToStr(a)); {16}
asm
mov ecx, n {使用预定义常量}
mov a, ecx
end;
ShowMessage(IntToStr(a)); {16}
end;