delphi 判断调试状态

D7:
DebugHook

该变量在调试状态下值为1,运行模式为0,例如,我们可以使用如下的代码来简单控制:

if DebugHook=0 then


DXE6 :

if IsDebuggerPresent then
LangManager.ActiveIndex := 0
else
LangManager.ActiveIndex := 1;

原文地址:https://www.cnblogs.com/maweiwei/p/7600313.html