AI摘要
本文介绍了一个用于检测DEDE反编译器的Procedure,名为Anti_DeDe。该程序专门针对2.5版本以后的DEDE反编译器。程序通过FindWindow函数查找反编译器窗口,如果找到,则使用SendMessage函数连续发送4500次关闭消息,以关闭反编译器窗口。
本文介绍了一个用
Procedure Anti_DeDe();//检测DEDE反编译器,只对2.5版本以后的起作用.
var
DeDeHandle:THandle;
i:integer;
begin
DeDeHandle:=FindWindow(nil,chr(65)+chr(65));
if DeDeHandle<>0 then
begin
For i:=1 to 4500 do
SendMessage(DeDeHandle,WM_CLOSE,0,0);
end;
end;