mixcode.dpr

来自「此为本书的配套光盘.本书不但由浅入深地讲解了软件保护技术」· DPR 代码 · 共 26 行

program MixCode;

{$APPTYPE CONSOLE}

uses
  SysUtils,Dialogs;
var
        pMsg:pchar;
        label lbl_skipok;
        label lbl_addr;
begin
  { TODO -oUser -cConsole Main : Insert code here }
	asm
		jmp lbl_skipok;
                db "hello",0
lbl_skipok:
		call lbl_addr
lbl_addr:
		pop eax				//取得本行代码运行时的地址
		mov pMsg,eax
	end;
	pMsg := pMsg - (5+6);   	//5是call lbl_addr的指令长度
		   			//6是hello字符串的长度
	ShowMessage(pMsg);
end.