Home > Back-end >  Delphi SuspendThread problem always fail!
Delphi SuspendThread problem always fail!

Time:09-24

Always not successful "SuspendThread suspended specified thread? Want to bring rights yao, which give a source view
For host after injected DLL SuspendThread failed
Threadbool:=Thread32First (snaphwd te32);
ThreadCount:=0;
While threadbool do
The begin
If te32. Th32OwnerProcessID=pid then
The begin
ThreadBuff [ThreadCount] :=te32. Th32ThreadID;
ThreadCount:=ThreadCount + 1;
end;

Threadbool:=Thread32Next (snaphwd te32);
end;


For I:=0 to ThreadCount do
The begin

Lasserror:=SuspendThread (ThreadBuff [I]);
Form1. Mmo2. Lines. The Add (" error: "+ inttohex (lasserror, 8));
Form1. Mmo1. Lines. The Add (+ inttohex 'thread:' (threadbuff [I], 8));
end;
  • Related