检测DEDE反编译器

该日志由 samool 发表于 2007-01-22 15:21:35

Procedure   Anti_DeDe();//检测DEDE反编译器,只对2.5版本以后的起作用.  
  var  
      DeDeHandle:THandle;  
      i:integer;  
  begin  
      DeDeHandle:=FindWindow(nil,chr($64)+chr($65)+chr($64)+chr($65));  
      if   DeDeHandle<>0   then  
          begin  
              For   i:=1   to   4500   do  
                  SendMessage(DeDeHandle,WM_CLOSE,0,0);  
          end;  
  end;  

该日志标签: none

上一篇: Anti-Monitor Delphi反调试
下一篇: Delphi anti-loader

当前暂无评论 »

添加新评论 »