Delphi the tag in mode:
Asm
Db $4, $10, 'VMProtect begin', 0//tag at the beginning.
end;
//want to protect the code
Asm
Db $4, $0 e, 'VMProtect end, 0//tag end.
end;
64 does not support assembly asm tag is?
What is the way to solve this problem?
Above the 64 - bit error, 32-bit compiler through, hope that god can have a solution? Thank you once again!!!!!
CodePudding user response:
64 - bit compiler just are not allowed to insert the asm everywhere piece, but you can write a separate assembly process:Procedure VMPBegin;
Asm
Db $4, $10, 'VMProtect begin', 0//tag at the beginning.
end;
Procedure VMPEnd; Forward;
//want to protect the code
Procedure SecureCode.
The begin
If an integer (@ VMPBegin) & lt; Integer (@ VMPEnd) then the begin end;//prevent useless to code by Delphi smartlink linker deleted
//...
end;
Procedure VMPEnd;
Asm
Db $4, $0 e, 'VMProtect end, 0//tag end.
end;
CodePudding user response:
Thank you for your reply, I used to do, he provides the demo