delphi 用VMP加密，加入asm，64位报错，32位没问题，有解决办法吗？

[m0_37875118]

加VMP的壳，我代码里面加密！
Delphi 中的标记模式：
asm
db $EB,$10,'VMProtect begin',0 //标记开始处.
end;
//想保护的程序代码
asm
db $EB,$0E,'VMProtect end',0 //标记结束处.
end;

64位不支持 汇编asm的标记是吗？
有什么办法去解决这个问题？

上面64位报错，32位编译通过，希望大神能有解决的办法？再次感谢！！

[日立奔腾浪潮微软松下联想]

64位编译器只是不允许随处插入asm块，但是可以写独立的汇编过程：
procedure VMPBegin;
asm
db $EB,$10,'VMProtect begin',0 //标记开始处.
end;

procedure VMPEnd; forward;

//想保护的程序代码
procedure SecureCode;
begin
if integer(@VMPBegin) < integer(@VMPEnd) then begin end; // 防止没用到的代码被Delphi的smartlink链接器删除掉
// ...
end;

procedure VMPEnd;
asm
db $EB,$0E,'VMProtect end',0 //标记结束处.
end;

[m0_37875118]

谢谢您的回复，我用他提供的demo来做了。