D7:DebugHook
该变量在调试状态下值为1,运行模式为0,例如,我们可以使用如下的代码来简单控制:
if DebugHook=0 thenDXE6 :
if IsDebuggerPresent then LangManager.ActiveIndex := 0 else LangManager.ActiveIndex := 1;