有M多人都是使用FindWindow来查找TAppBuild来判断是否是Delphi的IDE正在运行，实际上，Delphi提供了一个全局变量：
delphi5在system.pas里声明了一个全局变量
叫debughook,
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr(DebugHook));
end;
当显示为1时，表明运行在ide下，0时表明没有运行在ide下