delphi 判断调试状态

DebugHook

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

if DebugHook=0 then