• 56 Vote(s) - 2.88 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[DELPHI]detect debuggers
#1
Code:
function DebuggerPresent : boolean;
type
  TDebugProc = function : boolean;
    stdcall;
var
  Kernel32: HMODULE;
  DebugProc: TDebugProc;
begin
  Result := False;
  Kernel32 := GetModuleHandle('kernel32');
  if Kernel32<>0 then
  begin
    @DebugProc := GetProcAddress(Kernel32, 'IsDebuggerPresent');
    if Assigned(DebugProc) then
      Result := DebugProc
  end;
end;

گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
  Reply


Possibly Related Threads...
Thread Author Replies Views Last Post
  [Delphi] Simple Code Virtualization (Virtual Machine / Emulator) Amin_Mansouri 1 3,488 03-15-2013، 01:35 AM
Last Post: Saeed7007
  DELPHI OutputDebugStringA Anti Emulator ShellCode Amin_Mansouri 0 2,791 10-17-2011، 11:00 PM
Last Post: Amin_Mansouri
  [DELPHI]Anti JoeBox, CwSandbox, Anubis Amin_Mansouri 0 2,873 10-16-2011، 09:25 PM
Last Post: Amin_Mansouri
  [DELPHI]detect vm by krippler Amin_Mansouri 0 2,912 10-16-2011، 08:23 PM
Last Post: Amin_Mansouri
  [DELPHI]Anti ThreatExpert Amin_Mansouri 0 2,488 10-16-2011، 08:20 PM
Last Post: Amin_Mansouri
  AntiEmulators delphi Amin_Mansouri 0 2,684 10-15-2011، 09:57 PM
Last Post: Amin_Mansouri
  Delphi Anti Virtual PC/VMware Amin_Mansouri 0 2,609 09-22-2011، 12:39 AM
Last Post: Amin_Mansouri
  Delphi Detected OllyDbg Amin_Mansouri 0 2,691 08-31-2011، 09:28 AM
Last Post: Amin_Mansouri

Forum Jump:


Users browsing this thread: 1 Guest(s)