下面图老师小编要跟大家分享检测你的程序是否运行在虚拟机(VMware)，简单的过程中其实暗藏玄机，还是要细心学习，喜欢还请记得收藏哦！
【 tulaoshi.com - 编程语言 】
//------------------------------------------------------------------
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com/bianchengyuyan/）构建一个函数,使用了汇编语言啊,嘿嘿!
// -------------------开始-----------------------------------------
function IsVMwarePresent(): LongBool; stdcall;
begin
Result := False;
{$IFDEF CPU386}
try
asm
mov eax, 564D5868h
mov ebx, 00000000h
mov ecx, 0000000Ah
mov edx, 00005658h
in eax, dx
cmp ebx, 564D5868h
jne @@exit
mov Result, True
@@exit:
end;
except
Result := False;
end;
{$ENDIF}
end;
//------------------form http://blog.csdn.net/laoli----------------------------------------------------------
（本文来源于图老师网站，更多请访问http://www.tulaoshi.com/bianchengyuyan/）//---------------------------测试一下-----------------------------------------------------------------------------------
rocedure TForm1.FormCreate(Sender: TObject);
begin
if IsVMwarePresent then
ShowMessage('你运行在虚拟机')
else
ShowMessage('正常运行')
end;
//---------------------------------------------------------------------------------------------------------------------------
//----------------先保存---------按F9,运行,晕!有提示信息.不理!再按F9,:正常运行',哈哈!
来源:http://www.tulaoshi.com/n/20160219/1624566.html
看过《检测你的程序是否运行在虚拟机(VMware)》的人还看了以下文章 更多>>
