delphi 判断调试状态

D7:
DebugHook

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

if DebugHook=0 then


DXE6 :

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

posted @ 2017-09-27 10:11  绿水青山777  阅读(418)  评论(0编辑  收藏  举报