怎样知道我的程序是否运行在DELPHI?

原创 2001年10月05日 14:16:00
function IsAppRunningInDelphi : boolean;
var
  hKernelDll : THANDLE;
  proc_IsDebuggerPresent : TProcIsDebuggerPresent;
  useFindWindow : boolean;
  proc : FARPROC;
begin
  useFindWindow := true;
  if (Win32Platform = VER_PLATFORM_WIN32_NT) then
  begin
    // WinNt
    try
      hKernelDll := GetModuleHandle(kernel32);
      if (hKernelDll = -1) then
        hKernelDll := LoadLibrary(kernel32);
      if (hKernelDll <> -1) then
      begin
        proc := GetProcAddress(hKernelDll, 'IsDebuggerPresent');
        if (proc <> nil) then
        begin
          proc_IsDebuggerPresent := proc;
          result := proc_IsDebuggerPresent;
          useFindWindow := false;
        end;
      end;
    except
    end;
  end;
  if (UseFindWindow) then
  begin
    if FindWindow('TAppBuilder', Nil) <> 0 Then
      result := true
    else
      result := false;
  end;
end;

程序检测自身是否运行在虚拟机下

来自:http://www.codeproject.com/kb/system/VmDetect.aspx    分析病毒的时候人们通常在vmware等虚拟机下运行,以查看病毒的执行路径或者提取特征码...
  • gylll
  • gylll
  • 2010年10月28日 11:44
  • 1214

判断程序是否运行在虚拟机中的代码

首先我们要了解一下什么是虚拟机, 对虚拟机的通用解释是通过软件模拟的具有完整硬件系统功能的, 运行在一个完全隔离环境中的完整计算机系统. 通过虚拟机软件, 你可以在一台物理计算机上模拟出一台或多台虚拟...
  • liujiayu2
  • liujiayu2
  • 2017年12月08日 10:53
  • 238

怎样知道你的程序是运行在安全模式呢?

Use Windows API GetSystemMetrics with SM_CLEANBOOT parameter, this specifies how the system was star...
  • laoli
  • laoli
  • 2001年10月05日 14:01
  • 856

检查当前系统是否是运行在一个虚拟机环境

# Checking to see if we are a Guest VM. IS_GUEST_VM=`cat /proc/interrupts | grep Phys-irq`
  • crazyss
  • crazyss
  • 2014年06月07日 07:39
  • 467

Tomcat远程调试-IDEA工具

本地配置tomcat调试 idea开启tomcat远程debug
  • Memery_last
  • Memery_last
  • 2017年01月05日 09:53
  • 234

tomcat 远程debug,jpda的使用

开启tomcat远程debug模式 1.第一步,设置debug下面的端口 进入tomcat下面的bin目录, vi ./catalina.sh 找到JPDA_ADDRESS= 8099参数,设...
  • piaoslowly
  • piaoslowly
  • 2016年06月19日 00:12
  • 216

vc++通过执行特权指令来检测是否是虚拟机

http://bbs.hx95.com/simple/index.php?t119008.html http://joson-joson.i.sohu.com/blog/view/144586114...
  • wangshilin
  • wangshilin
  • 2012年11月08日 22:41
  • 649

探测linux是否运行xen

检测linux主机是否运行  xen,其原理是读取 CPUID 来判断,Xen 源代码下面有一段检测是否是 Xen 的 C 语言代码 tools/misc/xen-detect.c,这段代码提供了一个...
  • chenyulancn
  • chenyulancn
  • 2012年11月16日 10:26
  • 802

判断程序是否运行在虚拟机里

//判读程序是否运行在虚拟机里#include #include // IsInsideVPCs exception filterDWORD __forceinline IsInsideVPC_exc...
  • iiprogram
  • iiprogram
  • 2008年04月16日 23:13
  • 1234

判断程序是否运行在前台

//  .lib...LIBRARY   ws32.lib // for RWindowGroupLIBRARY   apgrfx.lib // for CApaWindowGroupName// ....
  • dymx101
  • dymx101
  • 2010年02月04日 18:03
  • 2189
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:怎样知道我的程序是否运行在DELPHI?
举报原因:
原因补充:

(最多只允许输入30个字)